Undo;
Метод Undo осуществляет отмену последней совершенной операции.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием "Button1", компонента TabSheetBox и компонента UiErAnalyzer с наименованием "UiErAnalyzer1", являющегося источником данных для TabSheetBox.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
OLAP: IEaxAnalyzer;
Pivot: IPivot;
Begin
OLAP := UiErAnalyzer1.ErAnalyzer;
Pivot := OLAP.Pivot;
If Pivot.IsUndoAvailable Then
Pivot.Undo;
End If;
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку будет осуществлена отмена последней совершенной операции на таблице экспресс-отчета, если таковая имеются.
См. также: