procedure TForm1.Button1Click(Sender: TObject);
begin
ibquery1.Close;
ibquery1.SQL.clear;
ibQuery1.Sql.Add('Select codigo, vendedor, nombre from Caclient');
ibQuery1.Sql.Add('Where nombre Like'+QuotedSTr('%'+edit1.Text+'%'));
ShowMessage(ibquery1.text);//Quitar es para ver como se arma el SQL
ibquery1.Open;
end;