Einzelnen Beitrag anzeigen

Benutzerbild von ATS3788
ATS3788

Registriert seit: 18. Mär 2004
Ort: Kriftel
646 Beiträge
 
Delphi XE Starter
 
#9

AW: Fastreport - Seitensteuerung

  Alt 23. Nov 2010, 17:33
Vielleicht hat ja mal jemand ein ähnliches Problem,
so sieht die Lösung aus.
Die Hilfe von Fast-Report kommt wirklich sehr schnell.

Delphi-Quellcode:
     frxReport.PrepareReport();
     j := frxReport.PreviewPages.Count div 2;
     page := TfrxReportPage.Create(nil);
     for i := 0 to j - 2 do
       begin
         page.AssignAll(frxReport.PreviewPages.Page[j + i]);
         frxReport.PreviewPages.AddEmptyPage(i * 2 + 1);
         frxReport.PreviewPages.ModifyPage(i * 2 + 1, page);
         frxReport.PreviewPages.DeletePage(j + i + 1);
       end;
     page.Free;
     frxReport.ShowPreparedReport;
Martin MIchael
  Mit Zitat antworten Zitat