ITabSheet.UndoRedo

Fore Syntax

UndoRedo: IUndoRedo;

Fore.NET Syntax

UndoRedo: Prognoz.Platform.Interop.ForeSystem.UndoRedo;

Description

The UndoRedo property determines parameter of Undo/Redo stack in the table.

Fore Example

To execute the example a regular report with the Report identifier is required.

Sub UserProc;
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    Report: IPrxReport;
    TUnRed: IUndoRedo;
Begin
    MB:= MetabaseClass.Active;
    MObj:= MB.ItemById("Report").Edit; 
    Report:= MObj As IPrxReport;
    TUnRed:= (Report.ActiveSheet As ITabSheet).UndoRedo;
    TUnRed.Enabled:= True;
    TUnRed.Limit:= 100;
    MObj.Save;
End Sub UserProc;

After executing the example an Undo or Redo stack is available for the table; the number of available undo or redo operations is set to 100 operations.

Fore.NET Example

To execute the example a regular report with the Report identifier is required.

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.ForeSystem;
Imports Prognoz.Platform.Interop.Tab;

...

Public Shared Sub Main(Params : StartParams);
Var
    MB: IMetabase; 
    MObj: IMetabaseObject;   
    Report: IPrxReport;
    TUnRed: IUndoRedo;
Begin
    MB:= Params.Metabase; 
    MObj:= MB.ItemById["Report"].Edit(); 
    Report:= MObj As IPrxReport;
    TUnRed:=(Report.ActiveSheet As ITabSheet).UndoRedo;
    TUnRed.Enabled:= True;
    TUnRed.Limit:= 100;
    MObj.Save();
End Sub;

After executing the example an Undo or Redo stack is available for the table; the number of available undo/redo operations is set to 100 operations.

See also:

ITabSheet