Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.30;
Скачать: CL | DM;

Вниз

Как выбрать пункт главного меню чужого приложения (окна)   Найти похожие ветки 

 
il   (2003-04-28 14:24) [0]

в меню войти удается по
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);
- ничего не получается


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

TrackPopupMenu(Ex) ?


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

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); //выполнить команду, ассоциированную с требуемым пунктом меню

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



Страницы: 1 вся ветка

Текущий архив: 2003.06.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.011 c
3-97483
Конюхов Сергей
2003-06-04 14:47
2003.06.30
Изменения с одной машині не видні на второй


14-97880
levova
2003-04-12 12:06
2003.06.30
Как использовать компонент TTelefoon?


1-97641
_Nox
2003-06-19 23:52
2003.06.30
Размер стэка?


14-97804
StarCon
2003-06-10 12:47
2003.06.30
а не пора ли перейти на Delphi 7


4-97927
3223(jab)
2003-04-29 12:34
2003.06.30
Как узнать версию исполняемого файла?