[[Caral]]

Hola
Cortemos esto y probemos otra vez.

Código Delphi [-]
procedure TForm6.Button2Click(Sender: TObject);
begin

     adoquery1.Close;
     adoquery1.SQL.Clear;
     adoquery1.SQL.Add('select * from merca ');
     adoquery1.SQL.Add(' where descripcion like' + Edit1.text);
     adoquery1.Open;
end;

A ver que pasa.
Saludos