简单问题:怎样将delphi自带的Demo程序Mdiapp中不可使用的菜单项变为可使用?(50分)

  • 主题发起人 主题发起人 leey
  • 开始时间 开始时间
L

leey

Unregistered / Unconfirmed
GUEST, unregistred user!
该Demo在.../Delphi6/Objrepos/MdiApp/目录下。它是用TActionlist+TMainMenue做的。
由于加入的是标准action,运行时有几个菜单项是灰的(不可使用),比如“save”,
按理在读入一个文件并改写了后,save菜单项应该是可以使用的,我无法将其变为可用。
请高手指点!
 
看看它的文件是不是有LOGIN文件,登陆时把MainMenu1.Items[0].enabled:=true;就可以了!!
主要是这样的Mainmenu.items[N].enabled:=true;其中N是菜单的项序数。祝你好运!!![:)]
 
To czl007:
  你所说的方法对单独使用TMainmenu是有效的,但我说的是TMainmenu和TActionlist
共同作用时的问题,这时再用你的方法就不灵了。幸好我自己试出了解决方法,即在
1.Action Editor中选中变灰的那一项,在其OnExecute事件中填入运行代码;
2.按需要设定该菜单项是否变灰,在本例中程序开始运行时save菜单项应是灰的,一旦
使用open或new菜单项打开或建立新文件后,save就应该变黑了。这时应该在Action Editor
中选中save,将其Enabled设为false,在open和new的OnExecute代码末尾加上使save的
Enabled:=true的命令即可。
 
接受答案了.
 
后退
顶部