Jak ustawić ENTER na SHOURTCUT?

Chciałbym na shoutrcut ustawic ENTEr, ESC lub SHIFT tylko jak to zrobić?

Windows ci nie pozwoli, jedynym rozwiazaniem bedzie

http://4programmers.net/search/?q=hook

Można tak:

If GetKeyState(13)<0 then

...

Enter : ShortCut(Word(#13), []);
ESC: ShortCut(Word(#27), []);