我正在尝试使用 TSQLMonitor 组件,但没有成功...
我的 OnTrace 事件中有以下代码:
procedure TForm1.SQLMonitor1LogTrace(Sender: TObject; TraceInfo: TDBXTraceInfo);
begin
memo1.Lines.Add(traceinfo.message);
end;
也可以,但是 SQL 命令中的“我的”值由问号(“?”)表示,我不知道为什么!看一个例子:
INTERBASE - isc_start_transaction
INTERBASE - isc_dsql_allocate_statement
**update "CDSUBPRODUTOS" set
"DATAINCLUSAO" = ?
where
"CDSPRCODIGO" = ? and
"DATAINCLUSAO" = ? and
"DATAALTERACAO" is null and
"CODUSUARIOALTERACAO" = ? and
"CDSPRCODGRUPO" = ? and
"CDSPRSITUACAO" = ? and
"CDSPRDESCRICAO" = ? and
"CDSPRMEDIDA" = ? and
"CDSPRVALOR" = ? and
"CDSPRUTILIZARFORMACAOPRECO_SN" = ?**
INTERBASE - isc_dsql_prepare
INTERBASE - isc_dsql_sql_info
INTERBASE - isc_portable_integer
INTERBASE - isc_dsql_describe_bind
INTERBASE - SQLDialect = 3
INTERBASE - isc_dsql_execute
INTERBASE - isc_dsql_free_statement
INTERBASE - isc_dsql_free_statement
INTERBASE - isc_commit_transaction
我希望这些符号被替换为正确的值(在这种情况下,更改的值)。我将 Delphi XE 与 Firebird 2.5 一起使用。
如果有人可以帮助我,我将不胜感激!!!拥抱!