Hi,

Add a Prepare before you assign the params.

> I have a simple form with a TIBOQuery, a TEdit and a 'Search'
> Tbutton. Here's the OnClick code:

> procedure TfmMain.Button1Click(Sender: TObject);
> begin
> with IBOQuery1 do
> try
> SQL.Clear;
> SQL.Add('SELECT CVEART FROM ARTICULOS WHERE CVEART=:pCve');

Prepare; <----- Add this line

> Params[0].AsString:=Edit1.Text;
> Open;
> if IsEmpty then
> Showmessage('Item Not Found')
> else
> Showmessage('Item Found - ');
> finally
> Close;
> end;
> end;

Daniel Rail
Senior System Engineer
ACCRA Group Inc. (www.accra.ca)
ACCRA Med Software Inc. (www.accramed.ca)