KeyEvents manipulieren

[Savar]

Ich möchte KeyEvents abfangen, verändern und weitersenden. Geht das überhaupt?
Ich nehmen an, dass ich dazu einen KeyboardHook wie diesen benötige:

Delphi-Quellcode:

library KeyboardHook; 

uses 
  Windows, 
  Messages; 

var 
  HookHandle: Cardinal = 0; 
  WindowHandle: Cardinal = 0; 

function KeyboardHookProc(nCode: Integer; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall; 
begin 
  Result := CallNextHookEx(HookHandle, nCode, wParam, lParam); 
  case nCode < 0 of 
    true: exit; 
    false: 
      begin 
        //ANWEISUNGEN
      end; 
  end; 
end; 

function InstallHook(Hwnd: Cardinal): Boolean; stdcall; 
begin 
  Result := False; 
  if HookHandle = 0 then begin 
    HookHandle := SetWindowsHookEx(WH_KEYBOARD, @KeyboardHookProc, HInstance, 0); 
    WindowHandle := Hwnd; 
    Result := TRUE; 
  end; 
end; 

function UninstallHook: Boolean; stdcall; 
begin 
  Result := UnhookWindowsHookEx(HookHandle); 
  HookHandle := 0; 
end; 

exports 
  InstallHook, 
  UninstallHook; 
end.

Mit welchen Anweisungen kann ich das erreichen?