Por favor tengo un poco de prisa con la respuesta

[jachguate]

Además de abrir el query, es probable que no te funcione como esperas debido a que regularmente la búsqueda es sensible a mayúsculas y minúsculas. Si ese es tu caso, una forma fácil de evitarlo es convirtiendo todo a mayúsculas:

Código Delphi [-]
Query1.Close;
  if edit1.text<>'' then
      query1.SQL.text:='SELECT * FROM proveedores WHERE upper(Proveedor) like upper(' + QuotedStr(Edit1.Text + '%') + ')';
  else
      query1.SQL.text:='SELECT * FROM proveedores';  
  Query1.Open;

Hasta luego.