lele9013 发表于 2008-11-12 14:23:03

如何利用托盘 中止一个While 或循环另一个事件？？

While   
    ...
WEnd

如何利用托盘 中止一个循环

或者 做另一个循环？？？


下面代码会一直进入死循环中 如何按托盘 退出 就中止循环呢？ 然后按开始 就继续循环哦

$c=0


#Include <Constants.au3>
#NoTrayIcon

Opt("TrayMenuMode",1)    ; 默认菜单项目 (脚本暂停/退出) will not be shown.

$settingsitem   = TrayCreateMenu("退出循环")

TrayCreateItem("")
$aboutitem      = TrayCreateItem("关于")
TrayCreateItem("")
$exititem       = TrayCreateItem("退出")

TraySetState()

While $c <> "10"

      MsgBox(4096, 0,0)



WEnd

While 1
    $msg = TrayGetMsg()
    Select
                Case $msg=$settingsitem
                       
                        $c=10
               
      Case $msg = 0
            ContinueLoop
      Case $msg = $aboutitem
            Msgbox(64,"关于:","AutoIt3-托盘-例子")
      Case $msg = $exititem
            ExitLoop
    EndSelect
WEnd

Exit

[ 本帖最后由 lele9013 于 2008-11-12 14:36 编辑 ]

liongodmien 发表于 2008-11-13 15:27:57

最好用ONEVENT模式，不然做出来也会很麻烦
页: [1]
查看完整版本: 如何利用托盘 中止一个While 或循环另一个事件？？