函数参考

TrayItemSetOnEvent

当菜单项目被点击,执行一个用户自定义函数.

TrayItemSetOnEvent ( 项目ID, "函数" )

参数

项目ID 控件标识 (itemID),参见 TrayCreateItem 的返回值.
函数 自定义函数的名称.

返回值

成功: 返回 1.
失败: 返回 0.
@error: 1 如果 "函数" 未定义.

注意/说明

OnEvent 函数只能在 TrayOnEventMode 选项设置为 1 时才能使用 - 当使用这种模式, TrayGetMsg 就不能使用.

可以使用 @TRAY_ID 得到项目控件标识.

如果 函数 是一个空字符串 "" ,先前定义的用户函数会被关闭.(the previous user-defined is disabled.)

相关

TrayCreateItem, TrayGetMsg, TrayOnEventMode (Option), TraySetOnEvent

示例/演示


#NoTrayIcon

Opt("TrayMenuMode", 3) ; 默认菜单项目 (脚本暂停中/退出)(Script Paused/Exit) 将不会显示,并且所选项目不能被选中(checkbox不会打勾) . 请参考TrayMenuMode选项1和2(3=1+2).
Opt("TrayOnEventMode", 1)

Example()

Func Example()
    TrayCreateItem("关于")
    TrayItemSetOnEvent(-1, "关于")

    TrayCreateItem("") ; Create a separator line.

    TrayCreateItem("退出")
    TrayItemSetOnEvent(-1, "ExitScript")

    TraySetState(1) ; Show the tray menu.

    While 1
        Sleep(100)  ; 空闲循环
    WEnd
EndFunc   ;==>Example

Func About()
    ; Display a message box about the AutoIt version and installation path of the AutoIt executable.
    MsgBox(4096, "", "AutoIt tray menu example." & @CRLF & @CRLF & _
            "Version: " & @AutoItVersion & @CRLF & _
            "Install Path: " & StringLeft(@AutoItExe, StringInStr(@AutoItExe, "\", 0, -1) - 1)) ; Find the folder of a full path.
EndFunc   ;==>About

Func ExitScript()
    Exit
EndFunc   ;==>ExitScript