Impresión informe de ocupación > 1 Página

[Cabanyaler]

Tambien he seguido estos pasos extraidos de la siguiente URL http://delphi.about.com/library/bluc/text/uc051701h.htm y que a continuación anexo:

QRComposite Report
QRComposite report does not work in an intuitive fashion. It does much more than simply calling one report after the other. Because a metafile is created for each page and this file is used to send data to the printer, Qrcomposite report uses this feature to make all the reports behave like one big report with each page being created and sent in one operation. To use this component, follow these steps:

1. Design all the reports you are using, each one in it's separate file and form. Add the units to the calling form so it can use them.

2. Place a QRCompositeReport component on your main form.

3. Click on the Add reports event and place code there to call each report in the order you want. Like this:

procedure Tform1.
 QRCompositeReport1AddReports
 (Sender : Tobject);
begin
 with QRCompositeReport1.Reports do
 begin
  Add(RepCustomer.Report);
  Add(RepSales.Report);
  Add(RepTotals.Report);
end;

4. In your main form's code add the line to print or preview this component. Like This:

QRCompositeReport1.Preview;


When you call this, the composite component calls each report in turn and adds the second through last report's pages to the first report's pages creating one large report. This is an attempt to seamlessly stitch together different reports to give the user the idea that all this output came from one report. It can be very useful if you have one report showing detail records and then need to print a report showing summaries for example. Another approach would be to simply call each report in turn individually, but this may not give the impression to the user that you may want. Having the Composite report component gives you a choice.

Pero el resultado es el mismo, primero tira todos las páginas del primer Report y a continuación todas las páginas del segundo Report