M
moutocean
Unregistered / Unconfirmed
GUEST, unregistred user!
现有一弹出菜单,选相有file,view,help.而且file的下拉框中有open,save,exit.请问如何建立file,view,help之间的联系,请问如何建立open,save,exit之间的联系,即open 与 save之间是否有index 这样的联系,可以在程序中方便的访问各个菜单选相.
李
李颖
Unregistered / Unconfirmed
GUEST, unregistred user!
Delphi的菜单项都有相应的控件对应，
在设计期间为这些MenuItem指定变量名称，
运行期间可以直接引用。
在设计期间为这些MenuItem指定变量名称，
运行期间可以直接引用。
茶
茶叶蛋
Unregistered / Unconfirmed
GUEST, unregistred user!
您的每个菜单项都是一个TMenuItem类型的对象，可以在程序中间直接访问的呀！
M
menxin
Unregistered / Unconfirmed
GUEST, unregistred user!
用name就可以访问啊。
P
Pang
Unregistered / Unconfirmed
GUEST, unregistred user!
file,view,help之间有index的关系，是从0到popupmenu1.items.count-1.
file的submenu中不知是否有关系，
可以使用两个popupmenu建立关联。
file的submenu中不知是否有关系，
可以使用两个popupmenu建立关联。
3
3h
Unregistered / Unconfirmed
GUEST, unregistred user!
你们说的虽然都可行，但我个人觉得，在同类控件之中进行区别，
最好使用TAG属性。TAG是一个Integer，可以任意设定。如我定：
menuitem tag
file/Open 11
file/save 12
file/close 13
...
view/cut 21
view/copy 22
view/delete 23
...
在程序中用：
procedure tmainform.fileopenitemclick(sender: Tobject);
begin
with sender as tmenuitem do
case tag of
11 : ... // file/Open
12 : ... // file/save
...
end;
end;
依此类推，全部属于TMenuItem类的项都联系起来了，甚至弹出菜单的项都没有
问题，总算可以全部共享一个OnClick代码了----当然你也可不。
最好使用TAG属性。TAG是一个Integer，可以任意设定。如我定：
menuitem tag
file/Open 11
file/save 12
file/close 13
...
view/cut 21
view/copy 22
view/delete 23
...
在程序中用：
procedure tmainform.fileopenitemclick(sender: Tobject);
begin
with sender as tmenuitem do
case tag of
11 : ... // file/Open
12 : ... // file/save
...
end;
end;
依此类推，全部属于TMenuItem类的项都联系起来了，甚至弹出菜单的项都没有
问题，总算可以全部共享一个OnClick代码了----当然你也可不。
3
3h
Unregistered / Unconfirmed
GUEST, unregistred user!
老凶你是不是还有别的什么要求？
J
Jams
Unregistered / Unconfirmed
GUEST, unregistred user!
老兄，你的忧虑太多，大可不必！以上诸位的‘教导’亦本人所言。
M
moutocean
Unregistered / Unconfirmed
GUEST, unregistred user!
多人接受答案了。