SetWindowHookEx und die inkompatiblen Typen

[Codehunter]

Hallo!

Es ist zum Haare raufen wenn man versucht alten Code nach XE4 zu portieren. Im Moment kämpfe ich mit SetWindowHookEx:

Delphi-Quellcode:

function MessageHookProc(Code: Integer; wParam: Integer; lParam: Integer): Integer; stdcall;
{...}

SetWindowsHookEx(WH_GETMESSAGE, MessageHookProc, 0, GetCurrentThreadID);

In Zeile 2 bei GetMessageHook ziehts dem Compiler die Socken aus:

Zitat:

Inkompatible Typen: 'NativeInt' und 'Integer'

Feine Sache das, also ändere ich mal fix die erste Zeile in:

Delphi-Quellcode:

function MessageHookProc(Code: Integer; wParam: Integer; lParam: Integer): NativeInt; stdcall;
{...}

meckert der Compiler daraufhin:

Zitat:

Inkompatible Typen: 'NativeUInt' und 'Integer'

Na gut, dann eben NativeUInt:

Delphi-Quellcode:

function MessageHookProc(Code: Integer; wParam: Integer; lParam: Integer): NativeUInt; stdcall;
{...}

Was der Compiler freundlicherweise mit

Zitat:

Inkompatible Typen: 'NativeInt' und 'NativeUInt'

quittiert. Der benimmt sich wie ein kleines Kind: Weiß genau was er nicht will aber hat keine Ahnung was er will

So und nu? Ich hab nen Filmriss...

Grüße
Cody