ILanerRevisionLegend.SetRevisions

Синтаксис

SetRevisions(FirstRevision: Integer; LastRevision: Integer);

Параметры

FirstRevision - ключ первой ревизии диапазона.

LastRevision - ключ последней ревизии диапазона.

Описание

Метод SetRevisions устанавливает диапазон отображаемых в легенде ревизий.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента TabSheetBox и компонента UiErAnalyzer с наименованием «UiErAnalyzer1», являющегося источником данных для TabSheetBox. В «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;

После выполнения примера будут заданы пользовательские цвета для первых четырех ревизий, будет определен диапазон отображаемых в легенде ревизий.

См. также:

ILanerRevisionLegend