Ver Mensaje Individual
  #6  
Antiguo 31-05-2012
Avatar de Cañones
Cañones Cañones is offline
Miembro
 
Registrado: ene 2007
Ubicación: La Paz Entre Ríos
Posts: 354
Reputación: 18
Cañones Va por buen camino
Creo que el query en el formulario está de más, debería estar en el datamodule y enlazado conun datasource. Pero va en gustos.

Yo lo que hago es esto.
- En el form creo una property string y voy recolectando todos los códigos que quiero buscar. Entonces en un tdblookupcombobox muesto los nombres y en otro los códigos. Los dos tdblookupcombobox me devuelven los códigos.
- Despues que termino de recolectar los paso como parámeto a un procedimiento en el datamodule y hago la búsqueda.

Código Delphi [-]
procedure TdmHorarios.filtrarPersonal(lasPersonas: string);
  var   elSQL: string;
  begin
  // filtro el personal para generar el reporte de  HH.EE.  

  elSQL:='AND P.IDPERSONA IN ('+lasPersonas+')';  
  // la consulta que necesito ya está cargada en el dataset y acá agrego los rengónes necesarios para filtrarla

  zroqPersonal.close;  

  zroqPersonal.SQL.Add(elSQL);
   zroqPersonal.Open;
  end;

- En un dbgrid enlazado al datasource y este enlazado al dataset se muestran los resultados de la búsqueda.


Espero te sirva.
No dudes en repreguntar.
Saludos.

Última edición por Cañones fecha: 31-05-2012 a las 23:29:50. Razón: Acomodé la etiqueta
Responder Con Cita