|
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 编辑 ] |
|