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