搜搜Afan版主的帖子~
haijie1223 发表于 2013-1-14 07:38
请问是这个吗,http://www.autoitx.com/forum.php ... p;highlight=%2BAfan$Rt = _WinTooltipsClose('需要关闭的“非粗体字标题”')
MsgBox(0, @error, $Rt)
Func _WinTooltipsClose($Title, $REFlag = 0, $Close = 1)
;afan提示:$Title - 需关闭提示窗口的“标题”
; (注意是非粗体字,相当于TrayTip设置的“文本”)
;$REFlag - [可选参数]是否使用正则,默认0=不使用
;$Close - [可选参数]是否关闭提示窗口,默认1=关闭
;返回值:是否关闭操作后返回“标题”字符串
; 未匹配到或标题为空返回 @Error
If $Title == '' Then Return SetError(1)
Local $aWL = WinList('[CLASS:tooltips_class32]')
Local $st, $msg, $IsIn = 0
For $i = 1 To $aWL[0][0]
$st = WinGetTitle($aWL[$i][1])
If $st = '' Then ContinueLoop
If Not $REFlag Then
If StringInStr($st, $Title) Then $IsIn = 1
ElseIf StringRegExp($st, $Title) Then
$IsIn = 1
EndIf
If $IsIn Then ExitLoop
Next
If Not $IsIn Then Return SetError(2)
If $Close Then ControlClick($aWL[$i][1], '', 0)
Return $st
EndFunc ;==>_WinTooltipsClose
不好意思,怎么使用才能得到我想要的信息? |