将MainMenu的items的子菜单N26隐藏关闭掉。
感谢不尽!
感谢不尽!
解决方案 »
- 无边边框窗体怎样停靠groupbox,停靠后怎样从groupbox拉出来恢复成一个窗体。
- 关于串口的开发!
- 如何隐藏自己的窗口在进程例表(最好能隐藏进程)
- 新年快乐,散分
- 如何用perform()实现 backspace功能?
- 请大家推荐1个效果最好,而且易用的xp界面控件,用过xpmenu感觉不好
- 我想做个查询的存储过程,请帮我看看。。。
- Delphi中如何修改键盘键值
- 使用olecontainer时,如何在运行时指定 OLE对象?
- 有大量的图片好维护,是把他们存到数据库,还是直接放在硬盘目录中。
- SETWINDOWSPOS为什么不能使我的FORM窗体为于所有窗体的最底层?高手在哪?
- 关于progressbar的问题?
假设不能保证所查找的菜单是否存在,则加判断语句。
Var FindItem :TMenuItem;
begin
FindItem := TMenuItem(FindComponent(MenuName));
if FindItem is nil then
begin
Result := -1;
exit
end
else
begin
FindItem.Visible := false;
FindItem.Enabled := false;
Result := 0;
end;
end;