找回密码
 加入
搜索
查看: 2695|回复: 10

[AU3基础] 请教哈 鼠标停留控件上气泡怎么不显示?【已解决】

[复制链接]
发表于 2020-6-10 09:51:53 | 显示全部楼层 |阅读模式
本帖最后由 cqboyqx 于 2020-6-10 14:01 编辑

RT,请教哈大佬们  ,当鼠标停留在一个控件上 ,怎么不弹出呢 ?是哪里的问题?
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GuiEdit.au3>

Local $hEdit, $sTitle = "ShowBalloonTip", $sText = "Displays a balloon tip associated with an edit control",$sText1 = "Program will exit"
#Region ### START Koda GUI section ### Form=
$Hgui = GUICreate("关于气泡的提示示例", 459, 276, 192, 124)
GUISetFont(12, 400, 0, "MS Sans Serif")
$hEdit = GUICtrlCreateLabel("鼠标停留弹出气泡", 152, 72, 132, 24)
$Button = GUICtrlCreateButton("关  闭", 176, 144, 75, 25)

GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $Cursor = GUIGetCursorInfo($Hgui)
            If (Not @error) And $Cursor[4] = $hEdit Then
                        _GUICtrlEdit_ShowBalloonTip($hEdit, $sTitle, $sText, $TTI_INFO)
            EndIf 
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit 
        Case $Button
                        _GUICtrlEdit_ShowBalloonTip($Button, $sTitle, $sText1, $TTI_INFO)
        EndSwitch
WEnd


发表于 2020-6-10 11:38:40 | 显示全部楼层
本帖最后由 afan 于 2020-6-10 11:44 编辑

直接用 GUICtrlSetTip 设置工具提示不好吗
Local $sTitle = "ShowBalloonTip", $sText = "Displays a balloon tip associated with an edit control", $sText1 = "Program will exit"

GUICreate("关于气泡的提示示例", 459, 276, 192, 124)
GUISetFont(12, 400, 0, "MS Sans Serif")
GUICtrlCreateLabel("鼠标停留弹出气泡", 152, 72, 132, 24)
GUICtrlSetTip(-1, $sText, $sTitle, 0, 1)
GUICtrlCreateButton("关  闭", 176, 144, 75, 25)
GUICtrlSetTip(-1, $sText1, $sTitle, 0, 1)
GUISetState()

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case -3
                        Exit
        EndSwitch
WEnd
 楼主| 发表于 2020-6-10 11:56:54 | 显示全部楼层
afan 发表于 2020-6-10 11:38
直接用 GUICtrlSetTip 设置工具提示不好吗

谢谢谢谢  A大威武  这种气泡看着舒服
发表于 2020-6-10 12:58:42 | 显示全部楼层
应该是控件的原因

_GUICtrlEdit_ShowBalloonTip,控件必须是edit,  lable控件应该不适用………………

第11行更改为: $hEdit = GUICtrlCreateEdit("鼠标停留弹出气泡", 2, 2, 394, 268)

能出效果,但是很闪。。。。。。。。。。很晕。。。。。。。。。。闪到怀疑人生。。。。。。

A大的 GUICtrlSetTip   是正解
 楼主| 发表于 2020-6-10 13:59:39 | 显示全部楼层
floor6ggg 发表于 2020-6-10 12:58
应该是控件的原因

_GUICtrlEdit_ShowBalloonTip,控件必须是edit,  lable控件应该不适用………………

对   如果按照你这样改了后  是闪  如果把20行的_GUICtrlEdit_ShowBalloonTip($hEdit, $sTitle, $sText, $TTI_INFO)放到11行的后面  就正常了
发表于 2020-6-11 14:59:14 | 显示全部楼层
cqboyqx 发表于 2020-6-10 13:59
对   如果按照你这样改了后  是闪  如果把20行的_GUICtrlEdit_ShowBalloonTip($hEdit, $sTitle, $sText,  ...

_GUICtrlEdit_ShowBalloonTip 不是用于鼠标悬停提示,而是立即提示的。一般用于对当下输入的字符做出的即时提示,类似于“只能输入数字”之类。
 楼主| 发表于 2020-6-11 16:47:25 | 显示全部楼层
afan 发表于 2020-6-11 14:59
_GUICtrlEdit_ShowBalloonTip 不是用于鼠标悬停提示,而是立即提示的。一般用于对当下输入的字符做出的即 ...

谢谢A大的帮忙
发表于 2020-6-12 07:09:35 | 显示全部楼层
afan 发表于 2020-6-10 11:38
直接用 GUICtrlSetTip 设置工具提示不好吗

GUICtrlSetTip ,A大不知道这个时间是否可以延长的,我发现没有几秒就消失掉了,
发表于 2020-6-12 13:29:50 | 显示全部楼层
本帖最后由 afan 于 2020-6-12 14:32 编辑
ttmv2019sx 发表于 2020-6-12 07:09
GUICtrlSetTip ,A大不知道这个时间是否可以延长的,我发现没有几秒就消失掉了,

这个跟系统的一样,都是5秒。要改变延时就用 _GUIToolTip_Create() 方式,或者直接用 Tooltip() 控制显示与关闭
发表于 2020-6-13 17:53:43 | 显示全部楼层
afan 发表于 2020-6-12 13:29
这个跟系统的一样,都是5秒。要改变延时就用 _GUIToolTip_Create() 方式,或者直接用 Tooltip() 控制显示 ...

好的,谢谢A大
发表于 2020-7-16 16:48:09 | 显示全部楼层
测试了下效果,好东西。
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-4-27 10:49 , Processed in 0.073901 second(s), 19 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表