Adoquery1 缺失 sql 属性 - Delphi

Adoquery1 missing sql property - Delphi

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

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;

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

 ADOQuery1.Active := true;

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