Ver Mensaje Individual
  #2  
Antiguo 22-03-2012
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
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.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita