Sorry so war es vorher!
function WinProc(WinHandle: HWND; Msg: DWORD; wParam, lParam: longint): LRESULT; stdcall;
Das war der Übeltäter!
wParam, lParam: longint
nicht
Msg: DWORD
Destotrotz ist
UNIT Namentlich und von wert her korrekt.
Aber seltsam das D11 vorher das Problem nicht erkannt hat.