FastReport Report drucken

[Union]

Du kannst die PDF-Seiten auch einzeln aus dem Gesamtreport erstellen, etwa so (ohne Garantie):

Delphi-Quellcode:

var
   i : integer;
begin
   frxPDFExport1.ShowDialog := False;
   frxReport1.PrepareReport;
   for i := 0 to frxReport1.PreviewPages.Count do
   begin
      frxPDFExport1.FileName := Format('Page%d.pdf', [i+1]);
      frxPDFExport1.StartPage(frxReport1.PreviewPages.Page[0], i);
      frxPDFExport1.FinishPage(frxReport1.PreviewPages.Page[0], i);
      frxReport1.Export(frxPDFExport1);
   end;
end;