Revert;
Метод Revert отменяет изменения, внесенные в область данных.
Отмена изменений возможна только для области данных, которую начали редактировать через метод IPrxDataIsland.Edit.
Для выполнения примера в репозитории предполагается наличие регламентного отчета, содержащего область данных, с идентификатором «REPORT_IPRXDATAISLAND».
Добавьте ссылки на системные сборки: Metabase, Report.
Sub UserProc;
Var
MB: IMetabase;
MObj: IMetabaseObject;
DI: IPrxDataIsland;
Report: IPrxReport;
Begin
// Получим репозиторий
MB := MetabaseClass.Active;
// Получим регламентный отчет
MObj := MB.ItemById("REPORT_IPRXDATAISLAND").Edit;
Report := MObj As IPrxReport;
DI := Report.DataIslands.Item(0).Edit;
// Изменяем имя
DI.Name := "DI";
// Выводим новое имя в окно консоли
Debug.WriteLine(DI.Name);
// Отменяем изменение имени
DI.Revert;
// Выводим прежнее имя в окно консоли и сохраняем
Debug.WriteLine(DI.Name);
DI.Save;
// Сохраняем отчет
MObj.Save;
End Sub UserProc;
После выполнения примера в окне консоли будет выведено новое имя области данных, затем имя после отмены переименования.
См. также: