TimStone wrote:Not really. Windows crashes it.
Other apps built with the same link script work fine. I'm thinking it may have to do with a newer set of features we use in the current builds of FWH/Harbour that are not supported in Win 7.
I'm not sympathetic since most Win 7 installs came with a free upgrade to Win 8 which was then free to upgrade to Win 10 / 11.
#ifdef __HARBOUR__
HB_FUNC( GETPROFSTRING )
#else
HB_FUNC( GETPROFSTR )
#endif
{
#define BUFSIZE 16384
BYTE * bBuffer = hb_xgrab( BUFSIZE );
WORD wLen = GetProfileString( hb_parc( 1 ), // Section
IF( HB_ISCHAR( 2 ), hb_parc( 2 ), 0 ), // Entry
hb_parc( 3 ), // Default
( char * ) bBuffer, // Destination Buffer
BUFSIZE - 1 );
if( wLen )
hb_retclen( ( char * ) bBuffer, wLen );
else
hb_retc( "" );
hb_xfree( bBuffer );
}
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: Google [Bot] and 42 guests