Создание горячих клавиш с VK_MENU

[noname_06]

Доброго времени суток!
Было ТЗ, добавить хоткеи для открытия ссылок по Ctrl+0..9 и создания новой ссылки по Ctrl+Alt+0..9.
Изначально использовался такой обработчик события (рабочий):

procedure TForm1.WMHotkey(var msg: TWMHotkey);
var
  btn: TToolButton;
begin
  case msg.HotKey of
    0..9 : 
    begin
      btn := (FindComponent('btnHotLink' + Chr(msg.HotKey + $30))) as TToolButton;
      if Assigned(btn) then
        HotLinc(btn, Form1.Caption, cbbAdress.Text, GetKeyState(VK_MENU) < 0);
    end;
  end;
end;

procedure HotLinc(Sender: TObject; Name, URL: string; new: Boolean);

Теперь не срабатывает перехват состояния Alt. За время между последней проверкой работы и выявлением проблемы внесено много изменений (в том числе заново созданы формы в XE3 и прикручен AlphaSkins), но ничего, связанного с хуками или клавиатурой. KeyPreview = True.
Проверял по таймеру значение GetKeyState(VK_MENU): для нажатой возвращает -127/-128, для отпущенной - 0/1, т.е. должно работать.
Пробовал дополнительно зарегистрировать комбинации Ctrl+Alt+0..9 - ситуация не прояснилась.