本帖最后由 半芯竹 于 2012-2-5 12:28 编辑
回复 5# sex123 #NoTrayIcon
Local $i
HotKeySet("{esc}","_Exit")
Opt("TrayOnEventMode", 1)
Opt("TrayMenuMode",1) ; 默认菜单项目 (脚本暂停中/退出)(Script Paused/Exit) 将不会显示.
Local $exititem = TrayCreateItem("退出")
TrayItemSetOnEvent($exititem, "_Exit" )
TraySetIcon("Shell32.dll", 10)
TraySetToolTip("SOS")
TraySetState() ; 显示托盘图标
TraySetState (4);让托盘图标闪烁
While 1
Sleep(500)
$i+=1
If $i > 10 Then
TraySetIcon();还原默认图标
TraySetState (8);让托盘图标停止闪烁
EndIf
WEnd
Func _Exit()
Exit
EndFunc
增加还原图标,停止闪烁 |