From e673116987c8574f98f27fbb5012e71915504cad Mon Sep 17 00:00:00 2001 From: Przemyslaw Czerpak Date: Mon, 15 Oct 2012 11:43:32 +0000 Subject: [PATCH] 2012-10-15 13:43 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl) * harbour/contrib/hbwin/win_prn1.c ! disabled EnumFontFamiliesEx() in WinCE builds --- harbour/ChangeLog | 4 ++++ harbour/contrib/hbwin/win_prn1.c | 4 +++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index f640cfb6b6..3940e33171 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,10 @@ The license applies to all entries newer than 2009-04-28. */ +2012-10-15 13:43 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl) + * harbour/contrib/hbwin/win_prn1.c + ! disabled EnumFontFamiliesEx() in WinCE builds + 2012-10-15 13:34 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl) * harbour/src/compiler/harbour.y * harbour/src/compiler/harbour.yyc diff --git a/harbour/contrib/hbwin/win_prn1.c b/harbour/contrib/hbwin/win_prn1.c index 1726e4ce41..c13ff6203f 100644 --- a/harbour/contrib/hbwin/win_prn1.c +++ b/harbour/contrib/hbwin/win_prn1.c @@ -578,10 +578,11 @@ HB_FUNC( WIN_ENUMFONTS ) HB_FUNC( WIN_ENUMFONTFAMILIES ) { + PHB_ITEM pArray = hb_itemArrayNew( 0 ); +#if ! defined( HB_OS_WIN_CE ) HDC hDC = hbwapi_par_HDC( 1 ); HB_BOOL fNullDC = ( ! hDC ); LOGFONT Logfont; - PHB_ITEM pArray = hb_itemArrayNew( 0 ); memset( &Logfont, 0, sizeof( Logfont ) ); @@ -600,6 +601,7 @@ HB_FUNC( WIN_ENUMFONTFAMILIES ) if( fNullDC ) ReleaseDC( NULL, hDC ); +#endif hb_itemReturnRelease( pArray ); }