Диалоговое окно для настроек

Диалоговое окно запускается двойным кликом по элементу списка аудируемых таблиц (методом DblClick компонента ListBox) с формы «Подсистема аудита». В диалоговом окне расположены два блока компонентов: для настройки процесса аудита и процесса очистки.

Два элемента ComboBox представляют списки аудируемых таблиц для выбора таблицы, к которой будут применены настройки. Для применения настроек ко всем таблицам используется элемент CheckBox. При нажатии на кнопку «Запуск» выполняются процедуры создания триггеров, выполняющих аудит, для всех таблиц или для выбранной в зависимости от свойства Checked элемента CheckBox. При нажатии на кнопку «Остановка» выполняются процедуры удаления триггеров. Также происходит изменение в таблице MainAudInf поля isAud, показывающего статус работы аудита.

Для настройки очистки на форме расположены компоненты типов TCheckBox, TDateTimePicker и TButton. Компонент CheckBox необходим для выбора отслеживаемых операций, к которым применяются настройки: Insert, Update и Delete. DateTimePicker используется для выбора даты, с которой начинается удаление старых записей в таблицах аудита. Button запускает применение выбранных настроек очистки. Настройки очистки также можно применять для всех таблиц или для одной, выбранной в зависимости от состояния компонента CheckBox.