Этот компонент предназначен для ведения статистики работы с БД, а также логгирования SQL-запросов. Смотрите демонстрационный пример SQLLogger: FIBPlusExamplessrcSQLLogger.

Свойства

Database
Это свойство возвращает базу данных, запросы которой отслеживает компонент.

ActiveStatistics
Включите эту опцию, чтобы отслеживать статистику БД

ActiveLogging
Включите эту опцию, чтобы вести лог БД.

ApplicationID
Это свойство возвращает строку, которая будет определять ваше приложение. Например, это свойство пригодится для идентификации приложений при наличии нескольких компонент для записи статистики в БД.

LogFileName
Это свойство возвращает имя файла, в который будет писаться лог БД.

StatisticsParams
Это свойство возвращает параметры, которые будут сохранены в статистике. Вот возможные значения параметров:
TFIBStatisticsParam = (fspExecuteCount, fspPrepareCount, fspSumTimeExecute, fspAvgTimeExecute, fspMaxTimeExecute, fspLastTimeExecute);
fspExecuteCount -количество выполнений определенного запроса;
fspPrepareCount -количество операций подготовки запроса;
fspSumTimeExecute -суммарное время выполнения запроса;
fspAvgTimeExecute -среднее время выполнения запроса;
fspMaxTimeExecute -максимальное время выполнения запроса;
fspLastTimeExecute -последнее время выполнения запроса.

LogFlags
Это свойство отвечает за то, какие типы операций будут записываться в лог.
Повторяют события TFIBSQLMonitor:

TLogFlag = (lfQPrepare, lfService,lfQExecute, lfQFetch, lfConnect, lfTransact, lfService, lfMisc);

ForceSaveLog
Если включена эта опция, то события будут записываться по мере поступления.

Методы

procedure Clear;

procedure SaveStatisticsToFile(const FileName:string);
Этот метод позволяет сохранить статистику в файл БД

procedure SortStatisticsForPrint(const VarName:string;Ascending:boolean);
Этот метод позволяет сортировать статистику БД

function ExistStatisticsTable:boolean;
Этот метод проверяет, создана ли в базе таблица статистики БД

procedure CreateStatisticsTable;
Этот метод позволяет создать таблицу для хранения статистики в БД

procedure SaveStatisticsToDB(ForMaxExecTime:integer=0);
Этот метод позволяет сохранить статистику в БД

procedure SaveLog;
Этот метод позволяет сохранить лог статистики БД