faceyao 发表于 2009-7-1 20:54:03

如何取消这个菜單?

本帖最后由 faceyao 于 2009-7-2 23:25 编辑

如何取消上面这菜单的出现，即“脚本已经暂停”。

但“退出”菜单要保留。

huangke 发表于 2009-7-1 23:25:57


#Include <Constants.au3>
#NoTrayIcon

Opt("TrayMenuMode",1)        ; 默认菜单项目 (脚本暂停中/退出)(Script Paused/Exit) 将不会显示.

$exititem                = TrayCreateItem("Exit")

TraySetState()

$start = 0
While 1
        $msg = TrayGetMsg()
        If $msg = $exititem Then ExitLoop
        $diff = TimerDiff($start)
        If $diff > 1000 Then
                $num = -Random(0,100,1)        ; negative to use ordinal numbering
                ToolTip("#icon=" & $num)
                TraySetIcon("Shell32.dll",$num)
                $start = TimerInit()
        EndIF
WEnd

Exit
参考帮助的。。。

kn007 发表于 2009-7-2 08:40:37

呵呵，楼上正解，附个传送门

http://www.autoitx.com/forum.php?mod=viewthread&tid=7825&page=1&fromuid=1003#pid60639

faceyao 发表于 2009-7-2 21:57:28

2# huangke

这个可以了，挺花的，能否不要变换变幻图标，就固定一种图标，即使很土的也无所谓！？？
代码该怎么改

xinda 发表于 2009-7-2 23:21:15

是这样吗??Opt("TrayMenuMode",1)
$exit = TrayCreateItem("退出脚本")
While 1
    If TrayGetMsg() = $exit Then ExitLoop
Wend

xinda 发表于 2009-7-2 23:21:19

是这样吗??Opt("TrayMenuMode",1)
$exit = TrayCreateItem("退出脚本")
While 1
    If TrayGetMsg() = $exit Then ExitLoop
Wend

faceyao 发表于 2009-7-2 23:25:25

谢谢，已解决
页: [1]
查看完整版本: 如何取消这个菜單?