registerHotKey funktioniert nicht

[Luckie]

Delphi-Quellcode:

function InstallHook(Hwnd: Cardinal): Boolean; stdcall;
begin
  Result := False;
  if HookHandle = 0 then begin
    HookHandle := SetWindowsHookEx(WH_KEYBOARD_LL, @LowLevelKeyboardProc, HInstance, 0);
    WindowHandle := Hwnd;
    Result := HookHandle <> 0;
  end;
end;