EnableMenuItem的用法?怎么改不了菜单相呢?

[qql0859]

已经得到子菜单的句柄childmenu,用下面的语句改不了:
EnableMenuItem(childmenu,0,MF_DISABLED);
或
EnableMenuItem(childmenu,0,MF_DISABLED and MF_BYPOSITION);

不知后面这个组合定义正确与否?

[qql0859]

to zswang(伴水清清)(专家门诊清洁工)
用下面的语句可以禁用和变灰"文件"菜单:
TestForm:= Findwindow(nil,PChar(Temp_Name));
TestMenu:=GetMenu(TestForm);
EnableMenuItem(TestMenu,0,MF_BYPOSITION or MF_DISABLED or MF_GRAYED);
DrawMenuBar(TestForm);
但我想禁用"文件"菜单下的一个功能相(菜单相),而不是整个"文件"菜单,如"新建",用下面的语句就不行了:
TestForm:= Findwindow(nil,PChar(Temp_Name));
TestMenu:=GetMenu(TestForm);
childmenu:=getsubmenu(TestMenu,0);
EnableMenuItem(childmenu,0,MF_BYPOSITION or MF_DISABLED or MF_GRAYED);
DrawMenuBar(TestForm);
是怎么回事情呢?


还有怎么删除工具条中的"新建"快捷按扭?
用DeleteMenu(childmenu,0,MF_BYPOSITION);可以删除菜单中的"新建"菜单相.

[王集鹄]

//屏蔽"记事本"的File菜单，测试通过
//注意:不是and是or
//DrawMenuBar()参数是窗体句柄不是菜单
procedure TForm1.Button1Click(Sender: TObject);
var
vFormHandle: THandle;
vMenuHandle: HMENU;
begin
vFormHandle := FindWindow('Notepad', nil);
if vFormHandle = 0 then Exit;
vMenuHandle := GetMenu(vFormHandle);
if vMenuHandle = 0 then Exit;
EnableMenuItem(vMenuHandle, 0,
MF_BYPOSITION or MF_DISABLED or MF_GRAYED);
DrawMenuBar(vFormHandle);
end;

[王集鹄]

//需要上级菜单的句柄

EnableMenuItem(MenuItem.Parent.Handle, MenuItem.MenuIndex,
MF_BYPOSITION or MF_DISABLED or MF_GRAYED);
DrawMenuBar(Handle); // 重新绘制菜单条

[qql0859]

to zswang(伴水清清)(专家门诊清洁工)

还是不行啊?TestMenu是主菜单句柄,childmenu是"文件(F)"下拉菜单的句柄,现在我是想禁用"文件(F)"菜单下的一个功能相"新建",用下面的语句不行:
EnableMenuItem(TestMenu,0,MF_DISABLED);
DrawMenuBar(TestMenu);
或
EnableMenuItem(childmenu,0,MF_DISABLED);
DrawMenuBar(childmenu);

[qql0859]

EnableMenuItem(childmenu,0,(MF_DISABLED and MF_BYPOSITION));
DrawMenuBar(childmenu);
或
EnableMenuItem(TestMenu,0,(MF_DISABLED and MF_BYPOSITION));
DrawMenuBar(TestMenu);

[qql0859]

也不行哦!

[qql0859]

高手们?在哪里?
知者不难!

[王集鹄]

//我试了记事本的"新建"，没问题
//不知道你要控制的是那一个程序？
//如果这个程序的菜单使用TAction关联，就不是这样容易了。

var
vFormHandle: THandle;
vMenuHandle: HMENU;
begin
vFormHandle := FindWindow('Notepad', nil);
if vFormHandle = 0 then Exit;
vMenuHandle := GetMenu(vFormHandle);
if vMenuHandle = 0 then Exit;
vMenuHandle := GetSubMenu(vMenuHandle, 0);
EnableMenuItem(vMenuHandle, 0,
MF_BYPOSITION or MF_DISABLED or MF_GRAYED);
DrawMenuBar(vFormHandle);
end;


--------------------- 第一天，他们给我注册超靓id，我没灌！ 第二天，他们威胁要把我的电脑黑了，我没灌！ 第三天，他们找了一个plmm和我聊天，我灌了！ 第四天，我还想灌，可论坛被查封了！ 嘻嘻嘻 伴水:)有屎以来最尾大的灌水夹 嘻嘻嘻嘻 (签名转让，电话：120)

[qql0859]

是一个外部应用程序,是不是使用了TAction关联,我不知道.是以前的开发人员做的,ZG就叫使用其中的一些功能.再来开发这个应用程序,时间来不及,费时又费力.
现在的想法是删除其中的一些不需要的菜单相(功能相)就OK了.
用zswang(伴水清清)(专家门诊清洁工) 的程序可以禁用或变灰主菜单中的某个下拉菜单,但下拉菜单中的一些功能还要用啊,我只想禁用某个下拉菜单中的一些相,而不是全部.
应该有办法吧?各位高手?急啊.

[qql0859]

问题还是没解决!
希望高手出现.

[lyl_98]

CMenu* mmenu = GetMenu();
CMenu* submenu = mmenu->GetSubMenu(0);
submenu->EnableMenuItem(ID_FILE_NEW, MF_DISABLED | MF_GRAYED);
--------------
转自MSDN