UndoRedo: IUndoRedo;
UndoRedo: Prognoz.Platform.Interop.ForeSystem.UndoRedo;
Свойство UndoRedo определяет параметры стека изменений (отмены/повтора) таблицы.
Для выполнения примера предполагается наличие регламентного отчета с идентификатором «Report».
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;
После выполнения примера для таблицы будет доступен стек изменений с ограничением по количеству операций отмены/повтора = 100 действий.
Для выполнения примера предполагается наличие регламентного отчета с идентификатором «Report».
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;
После выполнения примера для таблицы будет доступен стек изменений с ограничением по количеству операций отмены/повтора = 100 действий.
См. также: