ITabView.Undo

Синтаксис

Undo;

Описание

Метод Undo осуществляет отмену последней операции.

Пример

Sub Macro;

Var

Rep: IPrxReport;

Tab: ITabSheet;

View: ITabView;

Begin

Rep:=PrxReport.ActiveReport;

Tab:=Rep.ActiveSheet.Table;

View:=Tab.View;

If View.UndoCount<>0 Then

View.Undo;

End If;

End Sub Macro;

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

См. также:

ITabView