IAuditFilterObjects.Add

Синтаксис

Add: IAuditFilterObject;

Add(): Prognoz.Platform.Interop.Metabase.IAuditFilterObject;

Описание

Метод Add выполняет добавление нового фильтра в коллекцию.

Пример

Для выполнения примера предполагается наличие файла «C:\Filter.xml».

Добавьте ссылку на системную сборку Metabase.

Sub UserProc;
Var
    FilCon: IAuditFiltersContainer;
    Objs: IAuditFilterObjects;
    Obj: IAuditFilterObject;
Begin
    FilCon := New AuditFiltersContainer.Create;
    FilCon.Load;
    Objs := FilCon.Filters;
    Obj := Objs.Add.Edit;
    Obj.Description := "Описание фильтра";
    Obj.Save;
    FilCon.SaveToFile("C:\Filter.xml");
End Sub UserProc;
Public Shared Sub Main(Params: StartParams);
Var
    FilCon: IAuditFiltersContainer;
    Objs: IAuditFilterObjects;
    Obj: IAuditFilterObject;
Begin
    FilCon := 
New AuditFiltersContainer.Create();
    FilCon.Load();
    Objs := FilCon.Filters;
    Obj := Objs.Add().Edit();
    Obj.Description := 
"Описание фильтра";
    Obj.Save();
    FilCon.SaveToFile(
"C:\Filter.xml");
End Sub;

После выполнения примера, в коллекцию объектов будет добавлен новый фильтр. Контейнер, содержащий данную коллекцию, будет сохранен в файл «C:\Filter.xml».

См. также:

IAuditFilterObjects