[NumLock]

еще на будущее: перед тем, как скопировать русский текст (для английского не помешает) в буфер обмена (Clipboard.AsText:=) переключи язык на русский:

Код:

LoadKeyboardLayout(PChar('00000419'), KLF_ACTIVATE);
Clipboard.AsText:=