MaxDate: DateTime;
MaxDate: System.DateTime;
Свойство MaxDate определяет конечное значение даты и времени, используемое при фильтрации записей.
По умолчанию устанавливается значение текущей даты и времени.
Для выполнения примера предполагается наличие фильтра протокола доступа с идентификатором «FILTER».
Добавьте ссылку на системную сборку Metabase.
Содержимое первой вкладки
Содержимое второй вкладки
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.MinDate := DateTime.ComposeDay(2009, 1, 1);
Con.MaxDate := DateTime.Now;
Obj.Save;
FilCon.SaveToFile(FilCon.DefaultFileName);
End Sub UserProc;
После выполнения примера будет изменено свойство условия фильтрации: показывать записи протокола доступа, начиная с "01.01.2009" и заканчивая текущей датой.
См. также: