SetRevisions(FirstRevision: Integer; LastRevision: Integer);
FirstRevision: Key of the first revision in the range.
LastRevision: Key of the last revision in the range.
The SetRevisions method sets a range of revisions displayed in the legend.
Executing the example requires a form, the Button1 button on this form, the TabSheetBox component and the UiErAnalyzer component named UiErAnalyzer1 that is a data source for TabSheetBox. Working area of the time series database must 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: