IAuditFilterCondition.ClassCount

Syntax

ClassCount: Integer;

Description

The ClassCount property determines number of classes by which filtering is performed.

Example

Sub UserProc;

Var

FilCon: IAuditFiltersContainer;

Objs: IAuditFilterObjects;

Obj: IAuditFilterObject;

Con: IAuditFilterCondition;

Fil: IAuditFilter;

Begin

FilCon := New AuditFiltersContainer.Create;

FilCon.Load;

Objs := FilCon.Filters;

Obj := Objs.FindById("FILTER").Edit;

Fil := Obj.Filter;

Con := Fil.Item(0);

Con.ClassCount := 2;

Con.ClassId(0) := MetabaseObjectClass.KE_CLASS_PROCEDURALREPORT;

Con.ClassId(1) := MetabaseObjectClass.KE_CLASS_EXPRESSREPORT;

Obj.Save;

FilCon.SaveToFile(FilCon.DefaultFileName);

End Sub UserProc;

After executing this example the property if filter condition is changed: show records of access protocol for objects classes "Regular repost" and "Express report".