yy517 发表于 2016-5-5 07:10:52

TrayTip 函数在win10下，弹出气泡没法更新怎么破

本帖最后由 yy517 于 2016-5-5 07:20 编辑

TrayTip 函数在win10下，弹出1个气泡，必须要手动点击关闭，要不就一直待够时间才消失，做进度显示，总是出来一堆气泡，慢慢的一个一个消失，

1.TrayTip("清除任何托盘提示", "", 0);清除气泡也是清除不了的
2.程序关闭，气泡还是会继续显示一段时间

如何做到像win7下，弹出第二个气泡，第一个自动就没了那种效果呢？
谢啦

fybhwsx 发表于 2016-5-5 13:00:35

我也想知道，高手快来。。

fybhwsx 发表于 2016-5-5 13:01:29

而且设定显示时间的参数都无效？

afan 发表于 2016-5-5 14:18:12

可参考下 _WinTooltipsClose
http://www.autoitx.com/forum.php?mod=viewthread&tid=30395

yy517 发表于 2016-5-6 08:21:12

本帖最后由 yy517 于 2016-5-6 08:22 编辑

回复 4# afan


    win10下检测不到呢，关闭不了

for $i=1 to 10

        TrayTip("test",$i,60)
        sleep(500)
        $Rt = _WinTooltipsClose($i)

Next




Func _WinTooltipsClose($Title, $REFlag = 0, $Close = 1)
      ;afan提示：$Title - 需关闭提示窗口的“标题”
      ;　　　　(注意是非粗体字，相当于TrayTip设置的“文本”)
      ;$REFlag - [可选参数]是否使用正则，默认0=不使用
      ;$Close - [可选参数]是否关闭提示窗口，默认1=关闭
      ;返回值：是否关闭操作后返回“标题”字符串
      ;　　　　未匹配到或标题为空返回 @Error
      If $Title == '' Then Return SetError(1)
      Local $aWL = WinList('')
      ;Local $aWL = WinList('')
      Local $st, $msg, $IsIn = 0
                msgbox(48,"",$aWL)
      For $i = 1 To $aWL
                $st = WinGetTitle($aWL[$i])

                                msgbox(48,"",$st,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], '', 0)
      Return $st
EndFunc   ;==>_WinTooltipsClose

yy517 发表于 2016-5-6 08:24:45

回复 5# yy517


    另外 甲壳虫的代码也检测不到

afan 发表于 2016-5-6 11:01:13

回复 5# yy517


    我这没win10条件测试^

yy517 发表于 2016-5-6 18:36:39

回复 7# afan


    哈，还是谢谢版主了

qq33002 发表于 2016-5-7 17:50:20

不错不错，学习了

ddrs 发表于 2016-5-8 10:59:18

现到现在我也还没有用WIN10

yy517 发表于 2016-5-9 20:46:16

只好用弹出个进度条代替了
页: [1]
查看完整版本: TrayTip 函数在win10下，弹出气泡没法更新怎么破