Re: Question on TRvHelper example and preview

Return to index

Author

Message

Sergey Tkachenko

Posted: 04/02/2003 13:15:16

Yes, you are right.

>

> It looked like this:

>      SetWindowOrgEx(Canvas.Handle, -DocLeft, -HeaderTop, @pt);

>      rvh2.DrawPage(1, Canvas, True, rvh2.EndAt);

>      SetWindowOrgEx(Canvas.Handle, -DocLeft, -DocTop, @pt); // @pt

> replaced by new value

>      rvh.DrawPage(PageNo, Canvas, True, DocHeight);

>      SetWindowOrgEx(Canvas.Handle, pt.x, pt.y, nil);

>

> And that's how it should look:

>      SetWindowOrgEx(Canvas.Handle, -DocLeft, -HeaderTop, @pt);

>      rvh2.DrawPage(1, Canvas, True, rvh2.EndAt);

>      SetWindowOrgEx(Canvas.Handle, -DocLeft, -DocTop, nil); // @pt is safe

>      rvh.DrawPage(PageNo, Canvas, True, DocHeight);

>      SetWindowOrgEx(Canvas.Handle, pt.x, pt.y, nil);

>

> Now it works excellent. Thanks again for idea ;)

>