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

2012-10-15 13:43 UTC+0200 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)

Browse Source 
* harbour/contrib/hbwin/win_prn1.c
    ! disabled EnumFontFamiliesEx() in WinCE builds
This commit is contained in:
Przemyslaw Czerpak
2012-10-15 11:43:32 +00:00
parent a3b8dddaea
commit e673116987
2 changed files with 7 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
harbour/ChangeLog
View File

@@ -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

4
harbour/contrib/hbwin/win_prn1.c
View File

@@ -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 );
}