Вот, например:
Код:
#Include <Constants.au3>
#NoTrayIcon
Opt("TrayMenuMode", 1 + 2)
$checkeditem = TrayCreateItem("Checked")
$exititem = TrayCreateItem("Exit")
TraySetState()
While 1
$msg = TrayGetMsg()
Switch $msg
Case $checkeditem
If BitAND(TrayItemGetState($checkeditem), $TRAY_CHECKED) Then
TrayItemSetState($checkeditem, $TRAY_UNCHECKED)
Else
TrayItemSetState($checkeditem, $TRAY_CHECKED)
;RegWrite() здесь производишь например запись значения в реестр
EndIf
Case $exititem
Exit
EndSwitch
WEnd