Hi
another update:
backgrounds -
- watermark
- Document protection
- Save as DOC, DOCX, HTML, XML and PDF
greetings
Brunello
XRTF Update 4
Moderator: Rathinagiri
-
- Posts: 73
- Joined: Sat Apr 24, 2010 10:17 am
XRTF Update 4
- Attachments
-
- XRTF Update 4.zip
- (1.82 MiB) Downloaded 501 times
- esgici
- Posts: 4543
- Joined: Wed Jul 30, 2008 9:17 pm
- DBs Used: DBF
- Location: iskenderun / Turkiye
- Contact:
Re: XRTF Update 4
Hi Brunello
Thanks, nice improvementbrunellopulix wrote: another update:
backgrounds -
- watermark
- Document protection
- Save as DOC, DOCX, HTML, XML and PDF
Viva INTERNATIONAL HMG
- Rathinagiri
- Posts: 5471
- Joined: Tue Jul 29, 2008 6:30 pm
- DBs Used: MariaDB, SQLite, SQLCipher and MySQL
- Location: Sivakasi, India
- Contact:
Re: XRTF Update 4
That is a great news.
Can you achieve font underline, strike out effects in PDF?
Can you achieve font underline, strike out effects in PDF?
East or West HMG is the Best.
South or North HMG is worth.
...the possibilities are endless.
South or North HMG is worth.
...the possibilities are endless.
Re: XRTF Update 4
Hi Rathi,rathinagiri wrote:That is a great news.
Can you achieve font underline, strike out effects in PDF?
It is possible with a small trick below:
Code: Select all
if lStrikeout .or. lUnderline
HPDF_Page_SetLineWidth( _HMG_HPDFDATA[ 1 ][ 7 ], 1 )
if lColor
HPDF_Page_SetRGBStroke( _HMG_HPDFDATA[ 1 ][ 7 ], nRColor/255, nGColor/255, nBColor/255 )
else
HPDF_Page_SetRGBStroke( _HMG_HPDFDATA[ 1 ][ 7 ], 0.0, 0.0, 0.0 )
endif
nyPos += IF( lUnderline, -1, _HMG_HPDF_Pixel2MM(nFontSize)/2+1 )
HPDF_Page_MoveTo( _HMG_HPDFDATA[ 1 ][ 7 ], nxPos, nyPos )
HPDF_Page_LineTo( _HMG_HPDFDATA[ 1 ][ 7 ], nxPos + nTextWidth, nyPos )
HPDF_Page_Stroke( _HMG_HPDFDATA[ 1 ][ 7 ] )
endif
- Attachments
-
- Sample Page with underline and strike out effects
- hpdf-page2.png (19.04 KiB) Viewed 5087 times
Kind Regards,
Grigory Filatov
"Everything should be made as simple as possible, but no simpler." Albert Einstein
Grigory Filatov
"Everything should be made as simple as possible, but no simpler." Albert Einstein
- Rathinagiri
- Posts: 5471
- Joined: Tue Jul 29, 2008 6:30 pm
- DBs Used: MariaDB, SQLite, SQLCipher and MySQL
- Location: Sivakasi, India
- Contact:
Re: XRTF Update 4
That completes the circle Grigory!
East or West HMG is the Best.
South or North HMG is worth.
...the possibilities are endless.
South or North HMG is worth.
...the possibilities are endless.
-
- Posts: 73
- Joined: Sat Apr 24, 2010 10:17 am
Re: XRTF Update 4
HI
for interest:
FUNCTION WordVersion()
LOCAL oWord
LOCAL xRet
*
xRet := 0
oWord := CreateObject("Word.Application")
xRet := val(oWord:Version)
oWord:quit()
*****************************
*"95" Version = "7.0"
*"97" Version = "8.0"
*"2000" Version = "9.0"
*"2002" Version = "10.0"
*"2003" Version = "11.0"
*"2007" Version = "12.0"
*"2010" Version = "14.0"
*****************************
RETURN xRet
greetings
Brunello
for interest:
FUNCTION WordVersion()
LOCAL oWord
LOCAL xRet
*
xRet := 0
oWord := CreateObject("Word.Application")
xRet := val(oWord:Version)
oWord:quit()
*****************************
*"95" Version = "7.0"
*"97" Version = "8.0"
*"2000" Version = "9.0"
*"2002" Version = "10.0"
*"2003" Version = "11.0"
*"2007" Version = "12.0"
*"2010" Version = "14.0"
*****************************
RETURN xRet
greetings
Brunello