Append(Value: IAuditFilter);
Value is a filter of access protocol.
The Append method supplements the filter by new conditions.
Executing the example requires the "C:\1.xml" file that contains a filter of access protocol.
Sub Main;
Var
FilCon: IAuditFiltersContainer;
FilObj: IAuditFilterObject;
AF: IAuditFilter;
New_Filtr: IAuditFilterCondition;
Begin
FilCon := New AuditFiltersContainer.Create;
FilCon.LoadFromFile("C:\1.xml");
FilObj := FilCon.Filters.Add;
AF := FilObj.Filter;
New_Filtr := AF.Add;
New_Filtr.FinishDate := 39814;
FilObj.Filter.Append(AF);
FilCon.SaveToFile(FilCon.FileName);
End Sub Main;
After executing the example the filter, supplemented by new conditions, is added to the loaded file of access protocol filter. Then a filter file is saved back into the file.
See also: