RedoCount: Integer;
Свойство RedoCount возвращает количество операций, которые можно повторить.
Sub Macro;
Var
Rep: IPrxReport;
Tab: ITabSheet;
View: ITabView;
i: Integer;
Begin
Rep:=PrxReport.ActiveReport;
Tab:=Rep.ActiveSheet.Table;
View:=Tab.View;
i:=View.RedoCount;
WinApplication.InformationBox(i.ToString);
End Sub Macro;
Данный пример является макросом для регламентного отчета. После выполнения макроса на экран будет выведено информационное сообщение, содержащее количество операций, которые можно повторить.
См. также: