Re: RVPrint to TRVReportHelper

Return to index

Author

Message

Tobias Th�rn

Posted: 12/03/2003 10:27:14

Cheers!

Nice to hear. :-)

I create the headers within the program.

I have the pagenumber in the header and have to make a new header for every

new page.

To do this I first set:

RVPrint.OnPagePrepaint := DefaultHeader;

where:

    procedure DefaultHeader(Sender: TRVPrint; PageNo: Integer;

      Canvas: TCanvas; Preview: Boolean; PageRect, PrintAreaRect: TRect);

In Defaultheader I do:

  MakeHeader(RVHeader, FSettings, PageNo, Sender.PagesCount);

  RVPrint.SetHeader(RVHeader.RVData);

  RVPrint.FormatPages(rvdoAll);

Where FSettings is information about the dokument, like editionnumber,

replace editionnumber, created by, etc.

And Makeheader just create a table with this FSettings, a bitmap and the

pagenumber info and adds it to the RVHeader.

"Sergey Tkachenko" <[email protected]> skrev i meddelandet

news:[email protected]...

> Good news!

> I found how to export printing image to PDF using LLPDFLib:

> you can create a metafile with printer resolution, and then draw this

> metafile onto LLPDFLib Canvas. I tried, the result looks good.

> I'll create an example tomorrow.

>

> Which headers do you need? Are they generated by program, or they need to

be

> loaded from RTF or other format?

>

>

>