FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Preview - saving as Word or PDF document
Posts: 1467
Joined: Mon Oct 10, 2005 11:26 AM
Preview - saving as Word or PDF document
Posted: Thu Sep 01, 2011 03:07 PM

Hello,

If I want to save my preview as a Word or PDF document, and my preview is portrait, then my preview is pasted into a Word or PDF document which is landscape oriented.

How can I save a preview (portrait) as a Word or PDF document in portrait?

If my preview is landscape, the Word or PDF-document is landscape too. The problem occurs only when my preview is portrait.

Thank you in advance for any help.

Regards,

Michel D.
Genk (Belgium)


_____________________________________________________________________________________________

I use : FiveWin for (x)Harbour v. 25.12 - Harbour 3.2.0 (May 2025) - xHarbour Builder (January 2020) - Bcc773

Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Preview - saving as Word or PDF document
Posted: Thu Sep 01, 2011 05:33 PM

This happens when the width of the printed area is larger than the height of the printed area, though the printing is in portrait mode.

Please bear with us. We shall soon post a fix for this.

Regards



G. N. Rao.

Hyderabad, India
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Preview - saving as Word or PDF document
Posted: Thu Sep 01, 2011 07:13 PM
Please make this modification in "rpreview.prg"

For the existing line no. 1657
Code (fw): Select all Collapse
            oDoc:PageSetup:Orientation := If( nWidth > nHeight, 1, 0 )


Please substitute:
Code (fw): Select all Collapse
            oDoc:PageSetup:Orientation := If( oPreview:oDevice:GetOrientation() == 1, 0, 1 )


Can you please test after making this modification?
Regards



G. N. Rao.

Hyderabad, India
Posts: 1467
Joined: Mon Oct 10, 2005 11:26 AM
Re: Preview - saving as Word or PDF document
Posted: Thu Sep 01, 2011 07:48 PM

G.N. Rao,

Thank you so much. Also this is working just fine.

Regards,

Michel D.
Genk (Belgium)


_____________________________________________________________________________________________

I use : FiveWin for (x)Harbour v. 25.12 - Harbour 3.2.0 (May 2025) - xHarbour Builder (January 2020) - Bcc773

Continue the discussion