Ver Mensaje Individual
  #9  
Antiguo 14-11-2017
Avatar de mRoman
mRoman mRoman is offline
Miembro
 
Registrado: nov 2003
Posts: 599
Reputación: 21
mRoman Va por buen camino
Cita:
Empezado por The Cid James Ver Mensaje
Genial funciona perfectamente, ahora lo que no logro hacer es filtrar la consulta para agilizar la busqueda
El TDBLookupComboBox tiene una propiedad llamada, KeyValue que te permite tomar el valor (llave) del registro seleccionado.

Supongamos que realizas la consulta:

Código Delphi [-]
qryConsultaFiltrada.Close.
qryConsultaFiltrada.ParamByName('CAMPO_DE_LA_TABLA_A_FILTRAR').AsString:=TDBLookupComboBox.KeyValue;
qryConsultaFiltrada.Open;

El anterior código puede estar dentro de algun evento de un Botón.

Código Delphi [-]
procedure TForm1.BotonClick(Sender: TObject);
begin
    qryConsultaFiltrada.Close.
    qryConsultaFiltrada.ParamByName('CAMPO_DE_LA_TABLA_A_FILTRAR').AsString:=TDBLookupComboBox.KeyValue;
    qryConsultaFiltrada.Open;
end;

Cada vez q des click sobre el boton, se ejecutara el código.
__________________
Miguel Román

Afectuoso saludo desde tierras mexicanas....un aguachile?, con unas "cetaseas" bien "muertas"?, VENTE PUES !!
Responder Con Cita