UndoRedo: IUndoRedo;
UndoRedo: Prognoz.Platform.Interop.ForeSystem.UndoRedo;
Свойство UndoRedo возвращает параметры стека изменений (отмены/повтора) карты.
Для выполнения примера предполагается наличие в репозитории экспресс-отчета с идентификатором «EXPRESS_REPORT». Добавьте ссылки на системные сборки: Express, Map, Metabase.
Sub UserProc;
Var
MB: IMetabase;
Express: IEaxAnalyzer;
TUnRed: IUndoRedo;
Begin
MB := MetabaseClass.Active;
Express := MB.ItemById("EXPRESS_REPORT").Edit As IEaxAnalyzer;
TUnRed := Express.Map.Map.UndoRedo;
TUnRed.Enabled := True;
TUnRed.Limit := 30;
(Express As IMetabaseObject).Save;
End Sub UserProc;
После выполнения примера для карты экспресс-отчета будет доступен стек изменений с ограничением по количеству операций отмены/повтора = 30 действий.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.
Imports Prognoz.Platform.Interop.Express;
Imports Prognoz.Platform.Interop.ForeSystem;
Imports Prognoz.Platform.Interop.Map;
Imports Prognoz.Platform.Interop.Metabase;
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
Express: IEaxAnalyzer;
TUnRed: IUndoRedo;
Begin
MB := Params.Metabase;
Express := MB.ItemById["EXPRESS_REPORT"].Edit() As IEaxAnalyzer;
TUnRed := Express.Map.Map.UndoRedo;
TUnRed.Enabled := True;
TUnRed.Limit := 30;
(Express As IMetabaseObject).Save();
End Sub;
См. также: