fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2010-01-23 02:27 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/contrib/hbwin/win_tprn.prg
    ! do not ignore :setBkMode() called before :create()
This commit is contained in:
Przemyslaw Czerpak
2010-01-23 01:27:33 +00:00
parent ade0aa06b6
commit 45a966b56e
2 changed files with 7 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -17,6 +17,10 @@
past entries belonging to author(s): Viktor Szakats.
*/
2010-01-23 02:27 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/contrib/hbwin/win_tprn.prg
! do not ignore :setBkMode() called before :create()
2010-01-23 02:21 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
* contrib/hbnetio/utils/netiosrv.prg
* contrib/hbnetio/utils/netiocmd.prg

3
harbour/contrib/hbwin/win_tprn.prg
View File

@@ -250,6 +250,9 @@ METHOD Create() CLASS WIN_PRN
IF !lResult
::hPrinterDC := NIL
ELSE
IF ::BkMode != NIL
win_SetBkMode( ::hPrinterDc, ::BkMode )
ENDIF
// Set mapping mode to pixels, topleft down
win_SetMapMode( ::hPrinterDC, WIN_MM_TEXT )
// win_SetTextCharacterExtra( ::hPrinterDC, 0 ) // do not add extra char spacing even if bold