Чтобы клавиши shortcut пунктов главного меню главной формы действовали только в этой форме (но не в модальных окнах)

Знакомая проблема. Лечится так:

function WindowHook(var Message: TMessage): Boolean;
...

procedure.FormCreate(Sender: TObject);
begin
  // MainForm
  Application.HookMainWindow(WindowHook);
end;

function.WindowHook;
begin
  Result := False;

  with Message do
    case Msg of
      CM_APPKEYDOWN, CM_APPSYSCOMMAND: Msg := WM_NULL;
end;

офисы в аренду, база офисов в аренду . Банковское оборудование . налоговая регистрация ооо в Мытищах . парогенераторы для дома цена . горные лыжи соломон .