el codigo completo

[[ElDioni]]

este es el codigo que tengo en el change
no me funciona nada, primero se ven los datos de la tabla y cuando escribes algo el grid se queda en blanco no me realiza la busqueda

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

[Investment]

 
  if edit1.text<>'' then
   query1.SQL.text:='SELECT * FROM proveedores WHERE Proveedor like ' + QuotedStr(Edit1.Text + '%')
 else
   query1.SQL.text:='SELECT * FROM proveedores';
 
  Query1.Open;

Yo creo que falta el open de la query...

[jachguate]

Por lo dicho en este duplicado (de tres), este hilo queda cerrado.

Favor apegarse a la guia de estillo.