有没有办法将工具提示添加到 VB6 中的 MDI 父窗体？

Question

我目前正在开发一个使用 MDI 表单的项目。 我想要实现的是，当用户将鼠标悬停在 MDI 菜单中的菜单选项之一上时，会出现一个 ToolTipText，描述可以在所述菜单中找到的内容。 我知道在 VisualBasic 6 的某些选项中，支持 ToolTip 的事实。 但是，我似乎无法将其添加到 MDI 表单，或为此添加标签控件。 有没有人遇到过这个问题，如果有，是否有解决方法或解决方案？

如果您有任何其他问题或意见，请告诉我。 先感谢您。

Answer 1

我不知道 VB6 for（甚至非 MDI）上的任何真正菜单都有工具提示属性； 因此，当 MDIForm 的一个子窗体显示其菜单时，它也不会。

但是，有一些控件可以放在 MDI 父窗体上。 其中最有用的可能是 PictureBox，您可以在其中放置任何类型的控件，例如 CommandButton。 它必须使用 PictureBox.Align 属性“停靠”到 MDIForm 的顶部或底部。 PictureBox 中的控件可以按您希望的任何方式放置，并且可以设置其正常的 ToolTip 属性。

另一个我运气不错的 MIDForm 可用控件是 ToolBar 控件，它作为 CommonControls 组件的一部分出现。 和 PictureBox 一样，它有一个 .Align 属性，可以将它设置在 MDIForm 的顶部或底部。 您可以在其上放置任何合理数量的“按钮”，并对其外观（图形等）进行合理控制； 针对 OP 的查询，您可以为每个按钮分配一个工具提示。 就像 MDI 菜单通常所做的那样，根据当前活动的表单来改变按钮并不困难。

Answer 2

可以考虑的另一种替代方法（但实现起来可能很乏味）可能是读取每个 MDI 菜单的 Mouse.X 和 Mouse.Y 属性，并使用鼠标悬停事件设置标签控件（或文本框）的标题。

您需要找到每个 MDI 菜单的左上角和右下角点，如果它在框中，则可以显示带有预期标题的标签控件。 但请注意，除了图片框、工具栏和 Coolbars 等，您不能只在 MDI 窗体上放置任何控件。

因此，必须首先将 Label 或 TextBox 控件放在可以顶部对齐的 PictureBox 控件的顶部。