IsON: Boolean;
The IsON property determines the access protocol filtering by particular object use indicator.
If the value is True, the filtering by particular object is used, if the value is False, it is not used. After activation of this condition the access protocol contains the records only for the objects, that are found by the specified name and/or identifier.
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;
After executing the example the filtering condition is changed: access protocol records are displayed only for the objects, that contain the "Report" in their identifiers.
See also: