Ver Mensaje Individual
  #5  
Antiguo 08-06-2022
kainchu3102 kainchu3102 is offline
Miembro
 
Registrado: jul 2021
Posts: 79
Reputación: 6
kainchu3102 Va por buen camino
Respuesta a Casimiro

Código Delphi [-]
      with DataModule1.FDQTURNOS2 Do
      begin
       SQL.Clear;
       SQL.Add ('SELECT * FROM turnos WHERE fec_tur BETWEEN :FECHADESDE AND :FECHAHASTA ORDER BY fec_tur, hor_tur ASC');
       params.ParamByName('FECHADESDE').AsDate := DateTimePicker1.Date;
       params.ParamByName('FECHAHASTA').AsDate := DateTimePicker2.Date;
  
       Open();
     end;
     ////////////////////////////////////////////////////////////

    with DataModule1.FDQPAGOS2 Do
    begin
     SQL.Clear;
     SQL.Add ('SELECT * FROM pagos WHERE fec_pag BETWEEN :FECHADESDE AND :FECHAHASTA ORDER BY fec_pag, hor_pag ASC');

     params.ParamByName('FECHADESDE').AsDate := DateTimePicker1.Date;
     params.ParamByName('FECHAHASTA').AsDate := DateTimePicker2.Date;
     Open();
      end;

  DataModule1.FRXREPORT_PAGOS.ShowReport();



Este seria el codigo desde un Boton en Delphi.
Responder Con Cita