TPRINTER/HARUPDF Pen

TPRINTER/HARUPDF Pen

Postby byte-one » Sat Mar 07, 2020 9: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!
Last edited by byte-one on Sun Mar 08, 2020 12:03 pm, edited 2 times in total.
Regards,
Günther
---------------------------------
office@byte-one.com
User avatar
byte-one
 
Posts: 1048
Joined: Mon Oct 24, 2005 9:54 am
Location: Austria

Re: HARUPDF Pen

Postby byte-one » Sun Mar 08, 2020 11:57 am

Mr. Nages, in TPrinter:
Code: Select all  Expand view
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
User avatar
byte-one
 
Posts: 1048
Joined: Mon Oct 24, 2005 9:54 am
Location: Austria

Re: TPRINTER/HARUPDF Pen

Postby nageswaragunupudi » Sun Mar 08, 2020 4:09 pm

Please see pen.prg and suggest your modifications.
Regards

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

Re: TPRINTER/HARUPDF Pen

Postby byte-one » Sun Mar 08, 2020 8: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
User avatar
byte-one
 
Posts: 1048
Joined: Mon Oct 24, 2005 9:54 am
Location: Austria


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 33 guests