Adoquery1 missing sql property - Delphi

5.1k views Asked by At

I'm trying to add some data in an access database. But I'm having trouble because this returning the error:

ADOQuery1 missing sql property

Realized several modifications to the code and so far nothing has worked .

What am I doing wrong ?

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;
1

There are 1 answers

2
Jasper Schellingerhout On BEST ANSWER

The debugger should have shown you the line that failed. Remove

 ADOQuery1.Active := true;

That is the same as opening a query, but you do that before you set the SQL. If you do insert, delete or update you should really use a TADOCommand instead of a TADOQuery, but a TADOQuery will work.