windows - 如何在 Windows 上以编程方式添加菜单项分隔符？

Question

我的窗体上有一个主菜单，我希望能够以编程方式向其插入分隔符，而不是在设计时。我浏览了列出所有可用属性的主菜单的上下文弹出菜单，但没有找到任何允许我插入分隔符的东西。谷歌没有太大帮助。那么，这在 Windows 上的 Delphi 中是如何完成的呢？我正在使用 Delphi 2010。

我只是想做类似下面的事情，但是 AddSeparator 命令不存在:

MainMenu1.Items[5].AddSeparator;

Answer 1

创建一个新的菜单项并将其标题设置为'-'。

var
  MenuItem: TMenuItem;
....
MenuItem := TMenuItem.Create(Menu); // Menu is the menu into which you are adding
MenuItem.Caption := '-';
Menu.Items.Add(MenuItem);

您可以使用 Insert 将项目插入到菜单的中间，而不是添加到菜单末尾的 Add。

documentation说:

Specify a hyphen character (-) as the value of Caption for the menu item to indicate that the menu item is a separator.