delphi – 创建自定义提示窗口
发布时间：2020-12-15 09:47:47 所属栏目：大数据 来源：网络整理
导读：我正试图找到一种方法来使用我的第二种形式作为我的第一种形式的组件(例如TLabel)的提示窗口. 目前,我正在探索使用THintWindow和HintWindowClass,但是不可能直接将TForm分配给HintWindowClass.到目前为止我看到的一些例子使用的是TBitmap,然后在THintWindow.
|
我正试图找到一种方法来使用我的第二种形式作为我的第一种形式的组件(例如TLabel)的提示窗口.
目前,我正在探索使用THintWindow和HintWindowClass,但是不可能直接将TForm分配给HintWindowClass.到目前为止我看到的一些例子使用的是TBitmap,然后在THintWindow.Canvas上绘制,这也不错,但我还是想使用某种集成的自动机制. 我想到的另一个解决方案是使用所述Tlabel的OnMouseEnter,OnMouseMove和OnMouseLeave事件手动实现此功能. 如果确实有一种方法可以将TForm“赋值”给HintWindowClass,我想问一下是否有人可以提供说明这一点的代码片段.谢谢. 解决方法
THintWindow是TCustomControl的后代. TForm不是这两个类的后代,因此您不能将任何TForm类分配给HintWindowClass.提示窗口需要从THintWindow下降.你可以放在表格上的任何东西,你也可以穿上THintWindow.您只需手动实例化它并指定其Parent属性以使其显示.
你可以在“视觉上”设计一个提示窗口的最接近的是设计一个框架.让你的THintWindow后代创建一个框架的实例,然后覆盖ActivateHint(和ActivateHintData,如果你需要数据)将提示文本和所需的大小转发到你的框架. （编辑：李大同） 【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容! |