Скачать: CL | DM;

Меню чужого приложения   Найти похожие ветки 

← →
Vad ©   (2006-04-10 08:23) [0]

Как сделать Enable/Disable пунктов меню и субменю
у чужого приложения ?

По идее...
Находим нужное окно
wnd :=  FindWindow(nil,Pchar("Блокнот"));
Находим меню
hMHandle:=GetMenu(wnd);
Находим подменю
hSMHandle:=GetSubMenu(hMHandle,1);

как дальше?

---

← →
begin...end ©   (2006-04-10 08:31) [1]

EnableMenuItem

---

← →
Vad ©   (2006-04-10 09:11) [2]

var
 wnd:HWND;
 hMHandle,hSMHandle:hMENU;
 u1:UINT;
begin
wnd :=  FindWindow(nil,Pchar(ListBox1.Items.Strings[ListBox1.ItemIndex]));
hMHandle:=GetMenu(wnd);
hSMHandle:=GetSubMenu(hMHandle,strtoint(Edit1.text));
u1:=GetMenuItemId(hMHandle,strtoint(Edit2.text));
EnableMenuItem(hSMHandle,u1,MF_ENABLED);

В чем может быть косяк?

---

← →
Leonid Troyanovsky ©   (2006-04-10 10:03) [3]

> Vad ©   (10.04.06 09:11) [2]

> EnableMenuItem(hSMHandle,u1,MF_ENABLED);


MF_BYCOMMAND or MF_ENABLED

Вообще-то, положено анализировать возвращаемое функциями.

--
Regards, LVT.

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.027 c