Delphi跟随鼠标光标的文字提示效果
于 2022-02-28 发布
文件大小:10.75 kB
0 64
下载积分: 2
下载次数: 1
代码说明:
一款Delphi文字提示,跟随鼠标光标的文字提示效果,点击“开始”按钮后,激活此效果,把鼠标放在按钮上,即可看到一行滚动的文字提示,在Delphi代码中,变量做如下定义: procedure TimerOn; // 开启光标跟随定时器 procedure TimerOff; // 关闭光标跟随定时器 HintText: string; // Hint窗体要显示的提示文字 No_Enter: Boolean; // 鼠标尚未进入HintWindow内 HintHandle: DWORD; // HintWindow窗体句柄
下载说明:请别用迅雷下载,失败请重下,重下不扣分!
发表评论