Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как выбрать пункт главного меню чужого приложения (окна) [D6, Win2k]


il ©   (2003-04-28 14:24:00) 

в меню войти удается по
sendMessage(WindowHandle,WM_SYSCOMMAND,SC_KEYMENU,0);
а вот чтобы дальше двигаться по нему - никак. Пробовал посылать в окно "стрелку вниз" и "Enter" с помощью
sendMessage(H,WM_KEYDOWN ,VK_Return,0);
sendMessage(H,WM_KEYUP ,VK_Return,0);
или
sendMessage(H,WM_CHAR ,VK_Return,0);
- ничего не получается


il   (2003-04-28 17:12:00) [1]

TrackPopupMenu служит для того, чтобы показать контекстное меню, но пункт его юзверь будет выбирать сам.
Вот решение моей проблемы:
var H:hWnd;
mnuHandle:HMENU;
i:integer;

H:=FindWindow("TForm1","Form1");
mnuHandle:=getMenu(H); //получение хэндла главного меню
mnuHandle:=GetSubMenu(mnuHandle,1); //получение хендла выпадающего меню под вторым пунктом главного
i:=GetMenuItemID(mnuHandle,0); //получение идентификатора требуемого пункта
sendMessage(H,WM_COMMAND,i,0); //выполнить команду, ассоциированную с требуемым пунктом меню

> Игорь Шевченко
Спасибо за наводку!


Игорь Шевченко   (2003-04-28 15:56:00) [2]

TrackPopupMenu(Ex) ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо