jwawintype lines 1834 and 1837 incompatible types: char and widechar
procedure GetProcedureAddress
calls to GetModuleHandle and LoadLibrary
Logged In: YES user_id=651407
I agree with that. The patch is simple.
-- cut JwaWinType.pas -- {$IFDEF JWA_INCLUDEMODE} function GetModuleHandle(lpModuleName: LPCTSTR): HMODULE; stdcall; {$EXTERNALSYM GetModuleHandle} function LoadLibrary(lpLibFileName: LPCTSTR): HMODULE; stdcall; {$EXTERNALSYM LoadLibrary} -- end of cut --
should be
-- cut JwaWinType.pas -- {$IFDEF JWA_INCLUDEMODE} function GetModuleHandle(lpModuleName: PAnsiChar): HMODULE; stdcall; {$EXTERNALSYM GetModuleHandle} function LoadLibrary(lpLibFileName: PAnsiChar): HMODULE; stdcall; {$EXTERNALSYM LoadLibrary} -- end of cut --
Log in to post a comment.
Logged In: YES
user_id=651407
I agree with that.
The patch is simple.
-- cut JwaWinType.pas --
{$IFDEF JWA_INCLUDEMODE}
function GetModuleHandle(lpModuleName: LPCTSTR): HMODULE;
stdcall;
{$EXTERNALSYM GetModuleHandle}
function LoadLibrary(lpLibFileName: LPCTSTR): HMODULE; stdcall;
{$EXTERNALSYM LoadLibrary}
-- end of cut --
should be
-- cut JwaWinType.pas --
{$IFDEF JWA_INCLUDEMODE}
function GetModuleHandle(lpModuleName: PAnsiChar): HMODULE;
stdcall;
{$EXTERNALSYM GetModuleHandle}
function LoadLibrary(lpLibFileName: PAnsiChar): HMODULE;
stdcall;
{$EXTERNALSYM LoadLibrary}
-- end of cut --