Cita:
Empezado por The Cid James
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.