我有一个使用ADO/MSDASQL.1
提供程序的Delphi 7应用程序,我想知道是否可以以简单的方式"记录"发送到数据库的SQL查询?就像SQL Server中的SQL分析器一样?
在您的应用程序中,您可以在TADOConnection.OnWillExecute事件中记录命令,您只需保存CommandText,但您也可以记录许多其他选项.
procedure TForm23.ADOConnection1WillExecute(Connection: TADOConnection; var CommandText: WideString; var CursorType: TCursorType; var LockType: TADOLockType; var CommandType: TCommandType; var ExecuteOptions: TExecuteOptions; var EventStatus: TEventStatus; const Command: _Command; const Recordset: _Recordset); begin LogToFile( CommandText ); end;