我在MDI父表单中有一个主菜单,它作为主菜单。 现在我需要在运行时更改我的第一个菜单项的第一级标题。我怎么能这样做?
---更新---
对不起。我忘了告诉你,mainMenu被安置在TcontrolBar中。 我认为这是问题,因为到目前为止所有答案都不起作用。我曾经尝试过这一切。 但这只发生在第一级,所有其他级别都会正确更改。
答案 0 :(得分:2)
也许我错过了什么,但似乎很简单:
MainMenu1.Items[0].Caption := '&Hello'; // first top-level item
MainMenu1.Items[1].Caption := '&World'; // second top-level item, etc.
答案 1 :(得分:1)
在菜单编辑器中(在IDE的设计时),单击要更改的菜单,打开属性检查器并将名称更改为相关的名称,即MyFirstMenu。
然后在您的代码中,每当您想要更改菜单项标题时,您都可以使用:
MyFirstMenu.Caption := 'A New Caption';
或者如果动态构建主菜单,请参阅上面的TOndrej给出的答案。
[Edit1]
您的意思是您可以在菜单项上成功设置标题但是没有在TControlBar上看到更改吗?
答案 2 :(得分:1)
如果您使用的是在TControlBar中添加TToolbar的旧技术,然后为每个顶级菜单项添加工具按钮,那么您在表单中看到的顶级菜单项实际上就是工具按钮。直接设置标题,一切都应该有效。