delphi - 如何更改主菜单一级标题？

Question

我在 MDI 父窗体中有一个主菜单，它作为主菜单。现在我需要在运行时更改我的第一个菜单项的第一级标题。我怎样才能做到这一点？

- - 更新 - -

对不起。我忘了告诉你 mainMenu 位于 TcontrolBar 中。我认为这是问题所在，因为到目前为止所有答案都不起作用。我以前尝试过所有这些。但这仅发生在第一级，所有其他级别都正确更改。

Answer 1

也许我错过了一些东西，但这似乎很简单：

MainMenu1.Items[0].Caption := '&Hello'; // first top-level item
MainMenu1.Items[1].Caption := '&World'; // second top-level item, etc.

Answer 2

如果您使用在 TControlBar 内添加 TToolbar 的旧技术，然后为每个顶级菜单项添加一个工具按钮，那么您在表单中看到的顶级菜单项实际上是工具按钮。直接设置他们的标题，一切都应该工作。

Answer 3

在菜单编辑器中（在 IDE 中的设计时），单击要更改的菜单，打开属性检查器并将名称更改为相关的名称，即 MyFirstMenu。

然后在您的代码中，每当您想更改菜单项标题时，您都可以使用：

MyFirstMenu.Caption := 'A New Caption';

或者如果主菜单是动态构建的，请参见上面 TOndrej 给出的答案。

[编辑1]

您的意思是您可以在菜单项上成功设置标题，但在 TControlBar 上看不到更改？