FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour TPRINTER/HARUPDF Pen
Posts: 1048
Joined: Mon Oct 24, 2005 09:54 AM
TPRINTER/HARUPDF Pen
Posted: Sat Mar 07, 2020 09:26 AM

If i use the same oPen in tprinter and fwpdf the linewidth of box(...) are different! In tprinter the line are much stronger.
It seems, that box(..) in tprinter not compatible with older versions in case of using a pen-object. If i use oPen:hPen then is ok!

Regards,
Günther
---------------------------------
office@byte-one.com
Posts: 1048
Joined: Mon Oct 24, 2005 09:54 AM
Re: HARUPDF Pen
Posted: Sun Mar 08, 2020 11:57 AM
Mr. Nages, in TPrinter:
Code (fw): Select all Collapse
ParamPen( anoPen, lNew )
.....
         hPen  := CreatePen( PS_SOLID, aPen[ 2 ] * ::nLogPixelX() / 72, aPen[ 1 ] )   //this calculation should be dependent from cUnits!
.....
Regards,
Günther
---------------------------------
office@byte-one.com
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: TPRINTER/HARUPDF Pen
Posted: Sun Mar 08, 2020 04:09 PM

Please see pen.prg and suggest your modifications.

Regards



G. N. Rao.

Hyderabad, India
Posts: 1048
Joined: Mon Oct 24, 2005 09:54 AM
Re: TPRINTER/HARUPDF Pen
Posted: Sun Mar 08, 2020 08:44 PM

Mr. Nages, i have made some modifications on printer.prg and fwpdf.prg to improve this effect! Can i send you (your email??) the files? All modifications are marked with BYTE-ONE.

Regards,
Günther
---------------------------------
office@byte-one.com

Continue the discussion