Re: Page header and footer

Return to index

Author

Message

Yernar

Posted: 12/19/2002 17:46:23

(written by Sergey)

RichView1.Clear;

RichView2.Clear;

RichView1.RTFReadProperties.SetHeader(RichView2.RVData);

RichView1.LoadRTF('test.rtf');

RichView1.Format; // contains document

RichView2.Format; // contains header

if RichView1.RTFReadProperties.HeaderYMM>=0 then begin

  RVPrint1.HeaderYMM := RichView1.RTFReadProperties.HeaderYMM;

  RVPrint1.SetHeader(RichView2.RVData);

  end

else

  RVPrint1.SetHeader(nil);

RVPrint1.AssignSource(RichView1);

RVPrint1.FormatPages(rvdoAll);

RVPrint1.Print('Doc with header', 1, False);

"vanea" <vanea@basa.md> wrote:

>

>"Vanea" <vanea@basa.md> wrote:

>>

>>I wanna make something like page header and footer

>>

>>I wanna make some reports, and I need Header and footer

>>

>>is this posible ? with TRichViewEdit ?

>>

>>can somebody give me a simple example ?!

>

>

>

>I need some example of using SETHEADER and SETFOOTER