tquery, edit ydbgrid

[ecfisa]

Hola jacb1976.

Por favor trata que los títulos de tus mensajes sean representativos de la duda que vas a plantear, de ese modo es más fácil para todos encontrar soluciones a situaciones similares.

Con respecto a tu consulta, a los componentes que mencionas, agregá un TButton para llamar a la nueva consulta y en su evento OnClick poné:

Código Delphi [-]
procedure TForm1.btnBuscarClick(Sender: TObject);
begin
  Query1.Close;  
  Query1.SQL.Clear; 
  Query1.SQL.Add('SELECT * FROM TABLA_ZONAS '); 
  Query1.SQL.Add('WHERE CAMPO_ZONA = :PZONA');
  Query1.ParamByName('PZONA').AsString:= Edit1.Text;  
  Query1.Open; 
end;

Tendrás que reemplazar TABLA_ZONAS y CAMPO_ZONA, por los nombres que les hayas dado a tu tabla y campo a buscar respectivamente.


Saludos y gracias por tu colaboración.