Создание горячей клавиши для отображения окна

[xrenomx]

Здравствуйте.Пытаюсь создать горячую клавишу(alt+f10)...вроде работает,но насколько я понял,она работает только в активном окне.

Что собсно мне надо сделать:при создании программы,она скрывается,тут все просто в OnCreate написано:

ShowWindow(handle,sw_hide);
ShowWindow(Application.handle,SW_hide);

Для создание горячей клавиши делаю след.В разделе private указал:

 procedure WM_HotKeyHandler (var Message: TMessage);
 message WM_HOTKEY;

Далее я описал это все след.образом(код взят с интернета):

procedure TForm1.WM_HotKeyHandler (var Message: TMessage);
  var
    idHotKey: integer; //идентификатор, но об этом - позже
    fuModifiers: word; //модификатор MOD_XX
    uVirtKey: word; //код виртуальной клавиши VK_XX
begin
  // параметры сообщения получаем так:
  idHotkey:= Message.wParam;
  fuModifiers:= LOWORD(Message.lParam);
  uVirtKey:= HIWORD(Message.lParam);
 
  //теперь - небольшая проверочка:
  if (fuModifiers = MOD_ALT) AND (uVirtKey = VK_F10) then
    ShowWindow(application.handle,SW_SHOW);
  inherited;
end;

Запускаю,программа скрывается,при нажатии Alt+F10 ничего не происходит...
Что не так?

[volvo877]

Чтобы хоткей ловить, его надо сначала зарегистрировать (там же, при создании формы): RegisterHotKey

[GunSmoker]

Товарищ, вас в гугле забанили?

WM_HOTKEY, первая же ссылка:

Posted when the user presses a hot key registered by the RegisterHotKey function.

WM_HOTKEY, третья ссылка:

Сообщение WM_HOTKEY посылается тогда, когда пользователь нажимает комбинацию "горячая" клавиша, зарегистрированную функцией RegisterHotKey().

[xrenomx]

Спасибо за помощь все работает.