UndoRedo: IUndoRedo;
UndoRedo: Prognoz.Platform.Interop.ForeSystem.IUndoRedo;
The UndoRedo property determines parameters of Undo/Redo stack for the regular report.
Executing the example requires a regular report with the Report identifier.
Sub UserProc;
Var
MB: IMetabase;
MObj: IMetabaseObject;
Report: IPrxReport;
UnRed: IUndoRedo;
Begin
MB := MetabaseClass.Active;
MObj:= MB.ItemById("Report").Edit;
Report := MObj As IPrxReport;
UnRed:= Report.UndoRedo;
UnRed.Enabled:= True;
UnRed.Limit:= 100;
MObj.Save;
End Sub UserProc;
After executing the example the limit of 100 undo/redo operations is set for report stack.
Executing the example requires a regular report with the Report identifier.
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.ForeSystem;
…
Public Shared Sub Main(Params : StartParams);
Var
MB: IMetabase;
MObj: IMetabaseObject;
Report: IPrxReport;
UnRed: IUndoRedo;
Begin
MB := Params.Metabase;
MObj:= MB.ItemById["Report"].Edit();
Report:= MObj As IPrxReport;
UnRed:= Report.UndoRedo;
UnRed.Enabled:= True;
UnRed.Limit:= 100;
MObj.Save();
End Sub;
After executing the example the limit of 100 undo/redo operations is set for report stack.
See also: