Меню чужого приложения

← →
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);

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

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

> EnableMenuItem(hSMHandle,u1,MF_ENABLED);

MF_BYCOMMAND or MF_ENABLED

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

--
Regards, LVT.

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