Hello,
In class TIMAGE de FWH, when using:
[CODE]
hLib = LoadLibrary( "freeimage.dll" )
msgstop( hLib )
[ENDCODE]
...with harbour 11021, i see:
[RESULT]
Type = N Value = 61997056
[ENDRESULT]
...and harbour 11047:
[RESULT]
Type = P value = 0x03D20000
[ENDRESULT]
...and i see this error:
[ERROR]
Error: Erro BASE/1074 Error parameters: <=
[ENDERROR]
This is the code of TIMAGE.PRG:
[CODE]
static function FILOADIMG( cFile )
local nFormat, hDib, hInfoH, hInfo, hBits, hWnd, hDC, hBmp
if empty( cFile )
return 0
endif
if Upper( cFileExt( cFile ) ) = "BMP"
return ReadBitmap( 0, cFile )
endif
hLib = LoadLibrary( "" ) && Simple Test :)
msgstop( valtype( hlib ) + "-"+ valtoprg( hlib ) ) Here return with 1021:
N-0 and with 11047: P-0x00000000
hLib = LoadLibrary() && Simple Test :)
msgstop( valtype( hlib ) + "-"+ valtoprg( hlib ) ) Here return with 1021:
N-0 and with 11047: P-0x00000000
#ifdef __CLIPPER__
hLib = LoadLib32( "freeimage.dll" )
#else
hLib = LoadLibrary( "freeimage.dll" )
#endif
msgstop( valtype( hlib ) + "-"+ valtoprg( hlib ) )
if hLib <= 32 && <<<------ Here error
MsgStop( "Cannot load FreeImage.dll" )
return 0
endif
...
[ENDCODE]
How to fix this ?
Best regards,
Rossine.
--
View this message in context:
http://www.nabble.com/Problem-with-return-of-LoadLibrary-and-Harbour-11047-tp23539143p23539143.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
