Delphi:主菜单和工具栏。 CoolBar 的替代品

发布于 2024-11-18 05:49:34 字数 654 浏览 4 评论 0原文

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

我将主菜单嵌入到工具栏中。但主菜单的文本(按钮的标题)不在工具按钮的中心。

我有: 在此处输入图像描述

我需要: 在此处输入图像描述

我创建一个工具栏、4 个工具按钮并为每个按钮分配每个菜单。或者我在工具栏的“菜单”中分配一个主菜单。当我创建 ToolBotton 时,它的标题已经位于底部。难道没有人有一样的吗?

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

是否有替代方案可以达到与 Windows 防火墙的 CoolBar 相同的效果(使用 MainMenu + 断线 + ToolBar 的 ToolButtons)? 我使用Delphi 2010。

如何做到这一点? 如何正确使用工具栏中的主菜单? 谢谢!

PS 另一个例子,它不是来自 Windows: 在此处输入图像描述

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

I use a Toolbar as a MainMenu!

I embed a MainMenu into a ToolBar. But the text of the MainMenu (button's captions) is not in the center of ToolButtons.

I have:
enter image description here

I need:
enter image description here

I create a ToolBar, 4 ToolButtons and assign each menu for each button. Or I assign a MainMenu in "Menu" of a ToolBar. When I create a ToolBotton then it's caption is already at the bottom. Does nobody have the same?

After all these I will embed the ToolBar as the MainMenu into a CoolBar. Finally, I will have the same as in Windows Firewall.

Are there alternatives to have the same effect like the CoolBar of Windows Firewall (with the MainMenu + a break-line + ToolButtons of the ToolBar)?
I use Delphi 2010.

How to do this?
How to use properly a MainMenu in a ToolBar?
Thanks!

P.S. Another example and it is not from Windows:
enter image description here

and how to copy the last example...

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

评论(1

情丝乱 2024-11-25 05:49:34

以下内容可能会有所帮助:

  1. 在表单上拖放一个空的 TImageList

  2. 将其分配给工具栏

  3. ToolBar.List设置为True

  4. 根据您的喜好调整ImageList.Height

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

Here's what might help:

  1. Drop an empty TImageList on the form.

  2. Assign it to the ToolBar.

  3. Set ToolBar.List to True.

  4. Adjust ImageList.Height to your taste.

This will result in the buttons adjusting their heights to the ImageList.Height value and their captions getting centred vertically.

~没有更多了~
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文