delphi - 获取 EDBEngineError - 操作不适用于 Delphi XE2 中的 ExecSQL 语句

Question

我正在使用 TQuery 将记录插入表中。下面是相关代码。

with qryABC do
    begin
      Close;
      SQL.Clear;
      SQL.Text := 'INSERT INTO tableXYZ (ID) values (:ID)';
      ParamByName('ID').Value := AnyID;
      ExecSQL;
      Close;
    end;

当我从 oracle 触发相同的查询时，查询被触发，但是当我尝试从 delphi xe2 触发查询时出现异常。在调试时，我发现上面代码中的“ExecSQL”语句出错。异常是:EDBEngineError - 操作不适用

我用谷歌搜索但没有结果。请帮忙。

Answer 1

什么是 AnyID ？像这样的问题更好地显示数据类型声明和分配的值。

一般建议 - 不要使用 .Value，尝试使用 ParamByName('ID').AsInteger 或 ParamByName('ID').AsString 或您实际需要的特定参数。

这不仅会更快，而且还会通过编译时类型检查生成更确定的代码，而不是明显更慢且更不可预测的运行时动态 Variant 数据类型转换。

这适用于字段以及参数。