有时需要同时打印一组报表或在一个预览窗口中显示。
FastReport具有将第二个报表添加到已生成报表末尾的方法。TfrxReport.PrepareReport方法具有可选的ClearLastReport布尔参数，默认值为True。此参数为True时，将清除前一个已生成报表的输出。
下面的Pascal代码显示了如何生成包含两个报表的批处理：

frxReport1.LoadFromFile('1.fr3');
frxReport1.PrepareReport;
frxReport1.LoadFromFile('2.fr3');
frxReport1.PrepareReport(False);
frxReport1.ShowPreparedReport;

如何解决这个问题。您需要做的是，在一个统一的报表中完全控制您的各个报表，对每个报表重复此顺序。

Reporte: TfrxReport;  // multi report

...

rpt := TRptForm001.Create(Self); // Reports to process TRptForm001, TRptForm002..., TRptFormNNN

try       
  // Define filter report...
  rpt.ddFec := Date1;
  rpt.htFec := Date2;
  Rpt.Output := srStream; // The output is made to a TMemoryStream

  Rpt.Report;  // Run individual report

  Reporte.EngineOptions.DestroyForms := False;
  Reporte.EngineOptions.SilentMode := True;
  Reporte.EngineOptions.UseFileCache := True;
  Reporte.EngineOptions.UseGlobalDataSetList := False;
  Reporte.EnabledDataSets.Clear; // Delete any previous dataset
  Reporte.EnabledDataSets.Add(rpt.frxDBDataset1);  // Load dataset(s).(TfrxDBDataset)    
  Reporte.LoadFromStream(rpt.StreamRpt);  // Load stream generated in the rpt
  lOkPrepared := lOkPrepared and Reporte.PrepareReport(lFirst);
finally
  Rpt.CloseData;  // Close the datasets (TFDQuery) of the current report (001, 002, nnn)
  Rpt.Free;
end;

在个别报表中，Rpt001，002，nnn do

case FOutput of
      srStream:
        begin
          lClose := False;  // Dont close (TFDQuery)
          FStreamRpt := TMemoryStream.Create;
          frxrptIndMed.SaveToStream(FStreamRpt);
          FStreamRpt.Position := 0;
        end;

最后时刻

Reporte.ShowPreparedReport;

通过这种方式，您可以将复杂的报表与数据流程统一起来。