#include <Constants.au3>
#NoTrayIcon
Opt("TrayOnEventMode",1)
Opt("TrayMenuMode",1) ;默认菜单项目 (脚本暂停中/退出) 将不会显示.
TraySetOnEvent($TRAY_EVENT_PRIMARYDOUBLE,"SpecialEvent")
TraySetOnEvent($TRAY_EVENT_SECONDARYUP,"SpecialEvent")
TraySetState()
While 1
Sleep(10) ; 空闲循环
WEnd
Exit
; Functions
Func SpecialEvent()
Select
Case @TRAY_ID = $TRAY_EVENT_PRIMARYDOUBLE
Msgbox(64,"SpecialEvent-Info","主鼠标键双击.")
ExitEvent()
Case @TRAY_ID = $TRAY_EVENT_SECONDARYUP
Msgbox(64,"SpecialEvent-Info","次鼠标键双击.")
ExitEvent()
EndSelect
EndFunc
; Functions
Func ExitEvent()
Exit
EndFunc
从AU3的帮助中复制出来的,希望对楼主有点帮助。 |