el valor tintas no tiene parametros predeterminados es otro error con el codigo asi
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;