delphi - Delphi：主菜单和工具栏。CoolBar 的替代品

Question

我使用工具栏作为主菜单！

我将 MainMenu 嵌入到 ToolBar 中。但是 MainMenu 的文本（按钮的标题）不在 ToolButtons 的中心。

我有：

我需要：

我创建了一个工具栏、4 个工具按钮并为每个按钮分配了每个菜单。或者我在工具栏的“菜单”中分配一个 MainMenu。当我创建一个 ToolBotton 时，它的标题已经在底部。没有人有相同的吗？

在所有这些之后，我会将 ToolBar 作为 MainMenu 嵌入到 CoolBar 中。最后，我将拥有与 Windows 防火墙相同的功能。

是否有替代品具有与 Windows 防火墙的 CoolBar 相同的效果（使用 MainMenu + 断线 + ToolBar 的 ToolButtons）？我使用德尔福 2010。

这该怎么做？如何在工具栏中正确使用 MainMenu？谢谢！

PS 另一个例子，它不是来自 Windows：

以及如何复制最后一个示例...

Answer 1

这可能会有所帮助：

1. 在表格上放一个空TImageList。

2. 将其分配给ToolBar.

3. 设置ToolBar.List为True。

4. ImageList.Height根据你的口味调整。

这将导致按钮将其高度调整为该ImageList.Height值，并且其标题将垂直居中。