Сделать горячии клавиши для игры

#include <AppEvnts.hpp>
unsigned int F5;
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
  // "регистрируем горячую клавишу" (в данном случае F5), для срабатывания нажатия НЕ требуется наличия окна на переднем плане
  F5 = GlobalAddAtom("F5CheckAllocationsHotKey");  // чем "нестандартней" имя в кавычках, тем меньше вероятность конфликта с другими приложениями (насколько я понял, когда впервые читал описание этой функции; но могу ошибаться)
  RegisterHotKey(NULL, F5, 0, VK_F5);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
  // при закрытии формы отменяем "регистрацию"
  UnregisterHotKey(NULL, F5);
  GlobalDeleteAtom(F5);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ApplicationEvents1Message(tagMSG &Msg, bool &Handled)
{
if (Msg.message == WM_HOTKEY)
  if (Msg.wParam == F5)
    Button1->Click();  // наше действие; допустим, нажатие на кнопку 
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  // указываем, что должно происходить
}