Error on Quoted String within ADOQuery in Delphi: `Parameter object is improperly defined. Inconsistent or incomplete information was provided.`

Question

I am having trouble with below ADOQuery quoted string %ABC%:

adoQuery1.SQL.Clear;
adoQuery1.SQL.Text := 'SELECT * FROM MyDB.MyTable WHERE MyField LIKE ''''%ABC%'''' ';
adoQuery1.ExecSQL;
adoQuery1.Close;
adoQuery1.Open;

I also tried to pass below parameter instead but no success:

adoQuery1.SQL.Clear;
adoQuery1.SQL.Text := 'SELECT * FROM MyDB.MyTable WHERE MyField LIKE :Param1 ';
aqBCCombi.Parameters.ParamByName('Param1').Value := '%ABC%';
adoQuery1.ExecSQL;
adoQuery1.Close;
adoQuery1.Open;

Here's the error I get: Parameter object is improperly defined. Inconsistent or incomplete information was provided.

Anyone here who knows how to handle quoted string within the ADO SQL text? Appreciate any help.

FYI, ExecSQL; Close; Open; makes absolutely no sense. Second, use Open for SELECT - ExecSQL is for queries that do not return a resultset (insert, delete, update). — Ken White
– Ken White, Commented Jun 2, 2021 at 1:03

fpiette · Accepted Answer · 2021-05-29 09:08:29Z

1

This code very similar to yours works for me:

if Pos('%', Article) > 0 then begin
    SQLCmd := 'SELECT d0301000.id_partstd ' +
              'FROM d0301000 ' +
              'WHERE (d0301000.Type = ''AF'') ' +
                'AND (d0301000.Part_Nbr LIKE :Part_Nbr)';
    ADOQuery1.SQL.Text := SQLCmd;
    ADOQuery1.Parameters.ParamByName('Part_Nbr').Value := Article;
end
else begin 
    .....   // Code removed for simplicity
end;
ADOQuery1.Open;

You are using ExecSQL for a SELECT statement. Replace it with Open.

edited May 29, 2021 at 9:08

answered May 29, 2021 at 7:50

fpiette

12.5k1 gold badge34 silver badges52 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

Error on Quoted String within ADOQuery in Delphi: `Parameter object is improperly defined. Inconsistent or incomplete information was provided.`

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related