TGDIPages footer page numbers

esmondb · 2013-09-19 11:27:11

I want to create a report which is a concatenation of other reports and get the footer page numbering as shown in the original concatenated report ('Page #/#'). It doesn't seem that easy to do. Would one way be to add two private TIntegerDynArray variables to TGDIPages which parallel fPages in size? A 'ResetPageCount' function could be added to manage these new variables and then when EndDoc is called they would be used to build the footer page number text.

ab · 2013-09-19 11:37:09

Report merging is indeed not part of the current class implementation...

Is it not possible to use the same TGdiPages instance for all sub-reports?

esmondb · 2013-09-19 16:23:41

What I'm aiming for is a PDF with a set of reports with their original page numbers. Would it be possible to use

property Pages: TGDIPageContentDynArray read fPages;

to copy between two TGDIPages which are created at the same time. One would make all the sub-reports and the other would copy these as they are made and create a combined report at the end?

ab · 2013-09-19 19:26:55

You can use this array to access all pages metafiles and render them in one PDF.

esmondb · 2013-09-30 11:43:25

Could TGDIPages.SetMetaFileForPage and getMetaFileForPage be given public scope. Then I can simply do something like:

for i := 0 to NumberOfReports do
  //make report...
  report.EndDoc;
  for ii := 0 to report.PageCount -1 do begin
    MergedReport.NewPage;
    MergedReport.SetMetaFileForPage(MergedReport.PageCount-2, report.GetMetaFileForPage(ii));
  end;
end;

It's not perfect because NewPage flushes the last page overwriting the content. As a workaround the Merged report has one more page than needed and gets the penultimate page written to.

ab · 2013-09-30 11:54:03

IMHO this is much better to do it at PDF generation level, not creating any main TGdiPages report.

esmondb · 2013-09-30 12:04:07

OK, I'll try and do something along the lines of ExportPDFStream.

esmondb · 2013-10-01 05:24:33

Thanks for the help. I've worked out how to do it

mORMot Open Source

#1 2013-09-19 11:27:11

TGDIPages footer page numbers

#2 2013-09-19 11:37:09

Re: TGDIPages footer page numbers

#3 2013-09-19 16:23:41

Re: TGDIPages footer page numbers

#4 2013-09-19 19:26:55

Re: TGDIPages footer page numbers

#5 2013-09-30 11:43:25

Re: TGDIPages footer page numbers

#6 2013-09-30 11:54:03

Re: TGDIPages footer page numbers

#7 2013-09-30 12:04:07

Re: TGDIPages footer page numbers

#8 2013-10-01 05:24:33

Re: TGDIPages footer page numbers

Board footer