Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Impresión
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 24-02-2012
Avatar de chartres
chartres chartres is offline
Miembro
NULL
 
Registrado: may 2011
Posts: 31
Poder: 0
chartres Va por buen camino
Anidar, agrupar, juntar etc Varios reportes en uno ReportBuilder

Hola

Uso Reportbuilder 11

Alguien sabe como Agrupar/juntar o unir varios reportes generados independientemente , en uno solo.
No me refiero ala opcion Menu/Reports/Grupos.. osea no internamente.

Los reportes se generan atraves de un query en una misma pantalla,se genera uno por cada consulta o filtro. y quiero que los reportes que se generen en cada consulta se muestren en uno solo, al final.

gracias
__________________
No hay que Postear primero, hay saber Buscar..
Responder Con Cita
  #2  
Antiguo 20-03-2012
Avatar de chartres
chartres chartres is offline
Miembro
NULL
 
Registrado: may 2011
Posts: 31
Poder: 0
chartres Va por buen camino
Hola,
Como nadie dio respuesta y como siempre me pasa, termino resolviendolo yo solo.
aqui les va la solucion por si alguien la requiere.

Para juntasr 2 o mas reposrtes (generados independientemente) en uno solo, se hace lo siguiente: Reportbuilder 11

declaras estas variables y componentes.

I: Integer;
SubList, RptList: TList;
MasterRpt: TppReport;
SR: TppSubReport;


function TForrmReportes.Reportes(): TppReport;
begin
SubList := TList.Create;
RptList := TList.Create;

RptList.Add(Reporte1); // donde reporte 1 y 2 equivale a cada reporte generado previamente(componente TppReport)
RptList.Add(Report2);

MasterRpt := TppReport.Create(Self);
MasterRpt.CreateDefaultBands;
MasterRpt.RemoveBand(MasterRpt.HeaderBand);
MasterRpt.RemoveBand(MasterRpt.FooterBand);

for I := 0 to RptList.Count - 1 do begin
SR := TppSubReport.Create(Self);
SR.SetReportProperty(TppReport(RptList[i]));
SR.Band := MasterRpt.DetailBand;
SR.PrintBehavior:= pbSection;
SR.Report.PassSetting := psTwoPass;
SR.ResetPageNo := True;
SubList.Add(SR);

end;


with MasterRpt do
begin
AllowPrintToFile := True;
ShowPrintDialog := False;
PDFSettings.Author := 'ReportBuilder';
PDFSettings.Title := 'Export to PDF Demo';
TextFileName := 'C:\MyPDFFile.pdf';
end;
MasterRpt.Print;


end;





Nota: Algunas lineas quiza no son necesarias, pueden ir quitando y probando
Tambien, si te marca algun error quiza sera necesario agregar algunas unidades manualmente en el Uses de tu unidad como por ejemplo (ppTypes, ppSubRpt, ppReport ..etc) en caso de que no esten.


espero a alguien le sirva.
__________________
No hay que Postear primero, hay saber Buscar..
Responder Con Cita
  #3  
Antiguo 21-03-2012
Avatar de Casimiro Notevi
Casimiro Notevi Casimiro Notevi is offline
Moderador
 
Registrado: sep 2004
Ubicación: En algún lugar.
Posts: 32.042
Poder: 10
Casimiro Notevi Tiene un aura espectacularCasimiro Notevi Tiene un aura espectacular
Recuerda usar 'tags' cuando pongas código, ejemplo:




.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Varios detalles en ReportBuilder verodelphi Lazarus, FreePascal, Kylix, etc. 3 14-08-2007 09:25:47
Guardar Reportes ReportBuilder RolphyReyes Impresión 0 29-01-2007 20:58:14
agrupar varios campos satabel Impresión 0 03-08-2005 18:17:17
reportes con varios query krlos Impresión 1 15-03-2005 10:20:12
agrupar de a 1 y varios raudelink SQL 3 16-11-2004 00:58:11


La franja horaria es GMT +2. Ahora son las 01:06:33.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi