Anfängerfrage zu Hooks

[derseitzer]

Code:

function KeyboardHookProc(nCode: Integer; wParam: WPARAM; lParam: LPARAM):
 LRESULT; stdcall;
begin
showmessage('hi');
//es ist ebenfalls möglich die Bearbeitung an eine Bedingung zu knüpfen
//it's possible to call CallNextHookEx conditional only.
  Result := CallNextHookEx(HookHandle, nCode, wParam, lParam);
  case nCode < 0 of
    TRUE: exit; //wenn code kleiner 0 wird nix gemacht

    FALSE:
      begin
      if lParam = VK_SPACE then
      begin
      showmessage('Space!');
  end;
      end;
  end;
end;

Die Showmessages werden bei mir nicht ausgeführt :/ ich dachte es liegt daran.. woran könnte es dann liegen?