IsON: Boolean;
Свойство IsON определяет признак использования фильтрации протокола доступа по конкретному объекту.
При значении True фильтрация по конкретному объекту используется, при значении False - нет. При включении данного условия протокол доступа будет содержать записи только для объектов, которые найдены по указанному наименованию и/или идентификатору.
Sub UserProc;
Var
FilCon: IAuditFiltersContainer;
Objs: IAuditFilterObjects;
Obj: IAuditFilterObject;
Con: IAuditFilterCondition;
Fil: IAuditFilter;
Filter: IStringFilterCondition;
Begin
FilCon := New AuditFiltersContainer.Create;
FilCon.Load;
Objs := FilCon.Filters;
Obj := Objs.FindById("FILTER").Edit;
Fil := Obj.Filter;
If Fil.Count <= 0 Then
Con := Fil.Add;
Else
Con := Fil.Item(0);
End If;
Filter := Con.NameFilter;
Filter.IsON := True;
Filter.CaseSensitive := True;
Filter.WholeWordsOnly := False;
Filter.Value := "Report";
Obj.Save;
FilCon.SaveToFile(FilCon.DefaultFileName);
End Sub UserProc;
После выполнения примера будет изменено свойство условия фильтрации: показывать записи протокола доступа только для объектов, содержащих в наименовании «Report».
См. также: