delphi - Adoquery1 缺少 sql 属性 - Delphi

Question

我正在尝试在访问数据库中添加一些数据。但是我遇到了麻烦，因为这会返回错误：

ADOQuery1 missing sql property

实现了对代码的几处修改，到目前为止没有任何效果。

我究竟做错了什么 ？

try
    ADOConnection1.Connected := true;
    ADOQuery1.Active := true;
    try
        ///
        AdoQuery1.SQL.Clear;
        ADOQuery1.SQL.Add('INSERT INTO IP (tit_ip, url_ip, im_ip, des_ip) VALUES ( :a, :b, :c, :d )');
        AdoQuery1.parameters.parambyname('a').value := 'sd';
        AdoQuery1.parameters.parambyname('b').value := 'sdsd';
        AdoQuery1.parameters.parambyname('c').value := 'sd';
        AdoQuery1.parameters.parambyname('d').value := 'df';
        AdoQuery1.ExecSQL;
        AdoQuery1.close;
    finally
        ADOQuery1.Active := false;
        ADOConnection1.Connected := false;
    end;
except
    showmessage('Erro');
end;

Answer 1

调试器应该向您显示失败的行。消除

 ADOQuery1.Active := true;

这与打开查询相同，但您在设置 SQL 之前执行此操作。如果您确实插入、删除或更新，您应该真正使用 aTADOCommand而不是 a TADOQuery，但 aTADOQuery会起作用。