Order of pages in print

arcabral

I have a report with two pages. A cover page and a detail. I need to print in sequence 1 2 1 2 1 2...
 but print 1 1 1 2 2 2. How to solve?

gpi

You can resort preview pages after report's preparing:

var i, j: integer;

   page : TfrxReportPage;

begin

    frxReport1.PrepareReport();

    j := frxReport1.PreviewPages.Count div 2;

    page := TfrxReportPage.Create(nil);

    for i := 0 to j - 2 do

      begin

        page.AssignAll(frxReport1.PreviewPages.Page[j + i]);

        frxReport1.PreviewPages.AddEmptyPage(i * 2 + 1);

        frxReport1.PreviewPages.ModifyPage(i * 2 + 1, page);

        frxReport1.PreviewPages.DeletePage(j + i + 1);

      end;

    page.Free; 

    frxReport1.ShowPreparedReport;

end;