local hDLL := LoadLibrary( "ole32.dll" )
MsgInfo( hDLL )
FreeLibrary( hDLL )
function ShowVersion()
local aVersion := GetVersion()
local hDLL := LoadLibrary( "ole32.dll" )
local hDLL3 := LoadLibrary( "qualquer.dll" )
MsgInfo( hDLL) //<------------------------------ me devolve -1914127928
MsgInfo( hDLL2 ) //<------------------------------ me devolve -1939127892
MsgInfo( hDLL3 ) //<------------------------------ me devolve 0 nada pois a DLL não existe
FreeLibrary( hDLL )
MsgInfo( Str( aVersion[ 1 ] ) )
MsgInfo( Str( aVersion[ 2 ] ) )
MsgInfo( Str( aVersion[ 3 ] ) )
MsgInfo( Str( aVersion[ 4 ] ) )
return nil
Return to FiveWin para Pocket PC
Users browsing this forum: No registered users and 1 guest