| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Всплывающее меню
irq © (2003-06-30 10:52:00)
Задача - выполнить действия, связанные с пунктом всплывающего меню (TPopupMenu в Delphi) в чужой программе. Известные данные - ShortKey этого пункта и его индекс. Как решить задачу? Спасибо.
irq (2003-06-30 15:39:00) [1]
Этот способ на TPopupMenu не срабатывает :( После следующией прочитанной фразы "...Дескриптор всплывающего меню возвращают всего две функции - CreatePopupMenu и GetSubMenu..." появились сомнения, что это вообще возможно сделать. Для своего приложения дескриптор PopupMenu известен, а для чужого его еще найти нужно. Функция CreatePopupMenu не подходит по понятным причинам, а для функции GetSubMenu(HMENU hmenu, int nPos) на вход подается дескриптор меню, в позиции nPos которого находится данное PopupMenu. Хочется верить, что я ошибаюсь.
А насчет таблицы акселераторов можно попробовать через LoadAccelerators. Но только нужно учеть такой момент "Если указанное функции TranslateAccelerator окно свернуто, то она посылает сообщение WM_COMMAND, только если нажатый акселератор не связан с командой ни одного из элементов меню указанного окна".
Ян (2003-06-30 13:48:00) [2]
нужно получить идентификатор нужного пункта меню
//------------- N-номер пункта ---
MnuID:=GetMenuItemID(MnuHandle,N);
MnuHandle - хэндл того подменю в котором этот пункт
//-------------
sendmessage(WinHandle,WM_COMMAND,makewparam(MnuID,0),0);
для всплывающего меню не проверял,но отличий от обычного
быть не должно
Как сделать через ShortKey - самому интересно, пока не получилось. Теоретически надо получить таблицу акселераторов,
а потом TranslateAccelerator но как?
| |
