Preview - saving as Word or PDF document

Preview - saving as Word or PDF document

Postby driessen » Thu Sep 01, 2011 3: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. 24.07 - Harbour 3.2.0 (February 2024) - xHarbour Builder (January 2020) - Bcc773
User avatar
driessen
 
Posts: 1422
Joined: Mon Oct 10, 2005 11:26 am
Location: Genk, Belgium

Re: Preview - saving as Word or PDF document

Postby nageswaragunupudi » Thu Sep 01, 2011 5: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
User avatar
nageswaragunupudi
 
Posts: 10595
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: Preview - saving as Word or PDF document

Postby nageswaragunupudi » Thu Sep 01, 2011 7:13 pm

Please make this modification in "rpreview.prg"

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


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


Can you please test after making this modification?
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10595
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: Preview - saving as Word or PDF document

Postby driessen » Thu Sep 01, 2011 7: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. 24.07 - Harbour 3.2.0 (February 2024) - xHarbour Builder (January 2020) - Bcc773
User avatar
driessen
 
Posts: 1422
Joined: Mon Oct 10, 2005 11:26 am
Location: Genk, Belgium


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Lailton and 48 guests