Ver Mensaje Individual
  #2  
Antiguo 10-07-2007
Avatar de BlueSteel
[BlueSteel] BlueSteel is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Concepción - Chile
Posts: 2.310
Reputación: 26
BlueSteel Va por buen camino
Talking

Tengo un ejemplo de lo que quieres.. te lo puedo explicar por paso.. el único problema es que lo realice con el QReport que viene con el Delphi 7

Bueno lo que tengo es lo siguiente:

- Un boton de imprimir el informe
- Un informe en QReport
- 2 consultas Query
- 2 bandas (1 Detail y 1 SubDetail)

trabajo de la siguiente forma

cuando presiono el boton Imprimir_Informe ejecuto una sentencia para filtrar todos los registros que necesito

pro eje... las ordenes realizadas entre 2 fechas

Código Delphi [-]
     IBQ_Select.SQL.Clear;
     IBQ_Select.SQL.Add('Select * From "Orden","Proveedor"');
     IBQ_Select.SQL.Add('Where "Orden"."Pro_Rut"="Proveedor"."Pro_Rut"');
     IBQ_Select.SQL.Add('And "Orden"."Ord_Fecha" Between :Var1 And :Var2');
     IBQ_Select.SQL.Add('Order By "Ord_Numero"');
     IBQ_Select.Params[0].AsDate := vDes.Date;
     IBQ_Select.Params[1].AsDate := vHas.Date;
     IBQ_Select.Open;

en la banda Detail, tienes que poner todos los campos que necesitas imprimir

en la propiedad AfterPrint de la banda detail tiene que hacer el filtro para la segunda consulta.. .y asignas los campos que necesitas imprimir...

eso por lo pronto
__________________
BlueSteel
Responder Con Cita