Fastreport - Seitensteuerung

[Lemmy]

Hi,

was meinst du mit "die 3 Seiten Englisch und dann die 3 Seiten Deutsch"

Nach deinem Code sollte es zum einen gerade anders rum sein (also erst D und dann E) und zum anderen - Sind das jeweils mehrseitige Reports? Dann schau mal bei .PreviewPages.ADD - da gibts IMHO eine Version mit der du direkt die Seiten der Preview hinzufügen kannst...

Grüße

[ATS3788]

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;