使用TSQLMonitor跟踪不起作用

Question

我正在尝试使用TSQLMonitor组件，但我没有成功......

我在OnTrace事件中有以下代码：

procedure TForm1.SQLMonitor1LogTrace(Sender: TObject; TraceInfo: TDBXTraceInfo);
begin
  memo1.Lines.Add(traceinfo.message);
end;

同样适用，但SQL命令中的“my”值由问号（“？”）表示，我不是没有原因！看一个例子：

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。

如果有人可以帮助我，我会很感激！拥抱！

Answer 1

通过在互联网上搜索，似乎TSQLMonitor不显示参数值。甚至有一个2002 Quality Central issue #1358要求参数支持。我也找不到任何设置或财产。