5

我正在尝试在 Delphi XE3 中创建一个应用程序菜单和工具栏，如下所示（来自我拥有的程序）：

TCoolBar 中的主菜单和工具栏

我可以通过执行以下操作来复制这种外观的一部分：

  1. 创建一个新的 VCL Forms 应用程序
  2. 为文件/编辑/等添加TMainMenu和插入模板菜单。
  3. TCoolBar在表单中添加一个
  4. 添加一个TToolBar到TCoolBar
  5. TToolButton为TToolBar每个文件/编辑/等添加一个。并选择 Group 属性
  6. 从表单中删除 Menu 属性（因此不显示程序菜单）
  7. 将每个的 MenuItem 属性分配TToolButton给相应的文件/编辑/等。
  8. TToolBar在TCoolBar第一个下方添加第二个

这是它的样子：

我在 TCoolBar 中的主菜单和工具栏

它有点相似，但仍然缺少所有样式元素来修改新应用程序菜单的外观。

我的问题是，有谁知道如何获得类似的外观，也许是使用第三方组件库？最初的开发人员似乎使用了第三方 VCL 库。除了样式菜单和TCoolBar.

我已经尝试过 Raize 组件、TMS 高级工具栏和菜单，并且正在尝试 DevExpress VCL 组件。他们似乎都没有提供解决方案，但也许我对他们还不够熟悉，还没有弄清楚。

4

1 回答 1

5

Delphi 附带了一个演示，它可以向您展示如何使用(and )ActionBands为您的菜单“开箱即用”地获得这种外观。只需将菜单更改为演示中的：TActionMainMenuBarTActionToolBarStyleXP Style

ActionBands 演示

您的其余步骤似乎非常完整。有关菜单项和工具栏按钮上的图像，请参阅演示中与菜单和工具栏上的ImageList相关组件的使用。TActions

于 2013-02-15T00:05:41.103 回答