FIREDAC记录SQL日志
跟踪SQL日志可以方便开发的时候的程序调试。SQL日志记录会耗费服务费资源,正式部署中间件的时候,建议关闭SQL日志记录。
FIREDAC通过使用TFDMoniFlatFileClientLink控件来记录SQL日志的。
首先 USES FireDAC.Moni.FlatFile,然后拖放TFDMoniFlatFileClientLink控件。
TFDMoniFlatFileClientLink控件的主要属性:
设置SQL日志保存的目录和文件名:
FDMoniFlatFileClientLink1.FileName := ExtractFilePath(Application.ExeName) + 'sql'+ FormatDateTime('yyyymmdd', now)+'.txt';
设置 Tfdconnection控件日志记录参数:
fdconnection1.Params.Add('MonitorBy=FlatFile');
开始SQL日志记录:
FDMoniFlatFileClientLink1.Tracing := True;
fdconnection1.ConnectionIntf.Tracing := True;
停止SQL日志记录:
FDMoniFlatFileClientLink1.Tracing := false;
fdconnection1.ConnectionIntf.Tracing := false;