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;