The Composite report component allows many reports to be combined into a single document.
This is done by using the components 'AddReports' event, during which the 'Reports.Add' method is called to add report to the list to be combined.
The code snippet below illustrates how this is done. A composite report component called 'comprep' is referred to, as are quickrep components on two forms, repfrm1 and repfrm2.
This is done by using the components 'AddReports' event, during which the 'Reports.Add' method is called to add report to the list to be combined.
The code snippet below illustrates how this is done. A composite report component called 'comprep' is referred to, as are quickrep components on two forms, repfrm1 and repfrm2.
procedure MakeComp; begin comprep := TQRCompositeReport.Create( mainfrm); comprep.OnAddReports := mainfrm.CompRepAddReports; comprep.Preview; comprep.free; end; procedure Tmainfrm.SpeedButton1Click(Sender: TObject); begin MakeComp; end; procedure Tmainfrm.CompRepAddReports(Sender: TObject); begin comprep.Reports.Add( repfrm1.quickrep1 ); comprep.Reports.Add( repfrm2.quickrep1 ); end;