Дежурный стрелочник
Группа: Участник
Сообщений: 67
|
Опять какая-то странность.
Есть TRxTrayIcon к которому подключен TPopUpMenu и есть TActionList со стандартным действием TFileExit. Подключаем к пункту TPopUpMenu этот самый TFileExit, а сам PopUp подключам к TRxTrayIcon.
Запускаем приложение.
(Приложение при запуске не отображается, отображается только иконка в трее.)
CODE |
try
{
Application->Initialize();
Application->CreateForm(__classid(TMainForm), &MainForm);
Application->ShowMainForm = false;
Application->Run();
}
|
При нажатии прав. кн. на иконке в трее и выборе "Выход" ничего не происходит.
При выборе пункта в обычном меню, приложение закрывается.
При отключении Action и создании процедуры для пункта меню Exit:
CODE |
ExitOnClick()
{
MainForm->Close();
}
|
все работает прекрасно, т.е. приложение закрывается.
Подскажите, плиз, в чем проблема? |