【问题标题】:Delphi: MainMenu and ToolBar. Alternative of CoolBarDelphi:主菜单和工具栏。 CoolBar 的替代品
【发布时间】:2011-12-01 06:49:13
【问题描述】:

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

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

我有:

我需要:

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

完成所有这些后,我会将 ToolBar 作为 MainMenu 嵌入到 CoolBar 中。最后,我将拥有和Windows防火墙一样的东西。

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

如何做到这一点? 如何在工具栏中正确使用 MainMenu? 谢谢!

附:另一个例子,它不是来自 Windows:

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

【问题讨论】:

  • 你需要告诉我们你做了什么。 TMainMenu 的窗口菜单 不能 甚至定位在 TToolBar 内,所以你显然在做其他事情......你是否可能使用 TToolBar 和常规 TToolButton 按钮作为“菜单”?
  • @Andreas,只需将 TToolButton 的“MenuItem”设置为 TMainMenu 的父项之一。
  • @Sertac:当然,您可以将下拉菜单分配给工具按钮,但是您会得到两个菜单栏,因为您确实从 OP 正在谈论的TMainMenu 获得一个。 ..
  • @Andreas - 据我了解,maxfax 没有将表单的“菜单”设置为“MainMenu1”,而是通过将按钮的“MenuItem”设置为项目来使用工具栏作为主菜单的'MainMenu1'。我当然可能错了..
  • @Sertac:不过,如果您设置表单的Menu 属性,您会得到与“我需要”屏幕截图非常相似的结果。

标签: delphi menu toolbar caption


【解决方案1】:

这可能会有所帮助:

  1. 在表单上删除一个空的TImageList

  2. 将其分配给ToolBar

  3. ToolBar.List 设置为True

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

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

【讨论】:

  • 但它是一个标题后的空格...总比没有好:)
  • 我的情况下没有空间。 (我将ToolBar.Menu 设置为TMainMenu 实例。)在您的情况下,您可以尝试使用ImageList.Width
  • 我完成了你所有的步骤 + ImageList.Width=1。它没有帮助。但这没什么大不了的 :) 我使用的是 Dellphi 2010。
猜你喜欢
  • 1970-01-01
  • 2013-07-03
  • 1970-01-01
  • 2010-12-20
  • 1970-01-01
  • 2021-05-25
  • 2012-01-06
  • 1970-01-01
  • 1970-01-01
相关资源
最近更新 更多