Assign(Value: IAuditFiltersContainer);
Value. Контейнер, фильтры которого должны быть скопированы.
Метод Assign выполняет копирование контейнера.
Для выполнения примера предполагается наличие файла «C:\Filter.xml», содержащего фильтр протокола доступа.
Добавьте ссылку на системную сборку Metabase.
Sub UserProc;
Var
FilCon, FilConDef: IAuditFiltersContainer;
Begin
FilCon := New AuditFiltersContainer.Create;
FilCon.LoadFromFile("C:\Filter.xml");
FilConDef := New AuditFiltersContainer.Create;
FilConDef.Assign(FilCon);
FilConDef.SaveToFile("C:\Copy.xml");
End Sub UserProc;
После выполнения примера, контейнер FilCon будет скопирован в контейнер FilConDef. Контейнер FilConDef будет сохранен в файл «C:\Copy.xml».
См. также: