Przejęcie kontroli nad myszką

Witam !
Napisałem na podstawie Kompendium Delphi (Rozdział 5) oraz kilku przykładów programik do przejęcia kontroli nad myszką przez klawiaturę numeryczną:
http://aplus.aplus.pl/pliki/problem-zawladnac_mysza.rar (program + źródło)
Obsługa:

Do przesuwania myszki użyj strzałek na klawiaturze numerycznej
      8, 5 - góra,dół
      4, 6 - lewo, prawo
      7, 9 - lewy, prawy przycisk myszy

Problemem jest to, że nie tylko mam kontrolę nad strzałką ale również działają klawisze na klawiaturze, tak więc wciskając strzałkę w dół myszka przesuwa się w dół ale zarazem kursor tekstu przesuwa się w dół :/ jest jakiś sposób odłączenia od tego klawiatury, tak aby te klawisze nie działały ?

Pozdrawiam, Format

Załóż hook typu WH_KEYBOARD.

Po założeniu hooka WH_KEYBOARD nie mam możliwości odczytania wprowadzanego znaku...

if Buffer.Message = WM_KEYDOWN then... oraz wszystkiego związanego z Key : Byte
Edit:
OK. poradziłem sobie przy użyciu Jak założyć globalnego Hooka niskiego poziomu na klawiaturę pojawił się niestety kolejny problem:

• Każde wciśnięcie klawisza odpowiada 2-krotnemu wykonania funkcji np. poruszenia myszką
  Oto programik i źródło: http://aplus.aplus.pl/pliki/zawladnac2.rar

Nie musisz mieć 'if Buffer.Message = WM_KEYDOWN then' bo to jest hook tylko na klawisze klawiatury. Klawisze nie są reprezentowane jako znaki (Key : Byte) tylko każdy klawisz na klawiaturze ma przypisany kod wiryualny (wParam).