RevisionLegend: ILanerRevisionLegend;
The RevisionLegend property returns the revision legend for the series mode of time series database.
Executing the example requires a form, a button named Button1 on the form, the TabSheetBox component and the UiErAnalyzer component named UiErAnalyzer1 that is a data source for TabSheetBox. The working area of time series database should be loaded to UiErAnalyzer1.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
currentOlap: IEaxAnalyzer;
RevisionLegend: ILanerRevisionLegend;
Grid: IEaxGrid;
Begin
currentOlap := UiErAnalyzer1.ErAnalyzer;
Grid := currentOlap.Grid;
RevisionLegend := Grid.Style.RevisionLegend;
RevisionLegend.Clear;
RevisionLegend.ClearUserColors;
RevisionLegend.Color(1) := GxColor.FromName("Info");
RevisionLegend.Color(2) := GxColor.FromName("Olive");
RevisionLegend.Color(3) := GxColor.FromName("Green");
RevisionLegend.Color(4) := GxColor.FromName("Silver");
RevisionLegend.SetRevisions(1, 4);
End Sub Button1OnClick;
After executing the example, custom colors are set for the first four revisions and the range of the displayed legend revisions is selected.
See also: