[Creat0R]

программа перестает реагировать на все остальные команды юзера через меню трея »

Потому что обработка событии продолжается только после завершения вызванной событием функции - в этом случае лучше всего обрабатывать события в главном цикле:

Код:

$iLoop = False

Opt("TrayMenuMode", 1)
Opt("TrayOnEventMode", 1)
HotKeySet("{esc}", "ExitFunc")

$CurrentTime = TrayCreateItem("StartLoop")
TrayItemSetOnEvent(-1, "StartLoop")
$Exit = TrayCreateItem("Exit")
TrayItemSetOnEvent(-1, "ExitFunc")

While 1
    Sleep(100)

    If $iLoop Then Loop_Proc()
WEnd

Func StartLoop()
    ;m("StartLoop() starts")

    $iLoop = Not $iLoop

    $sText = "StartLoop"
    If $iLoop Then $sText = "StopLoop"

    TrayItemSetText($CurrentTime, $sText)
EndFunc

Func Loop_Proc()
    While Not $iLoop
        Sleep(100)
    WEnd
EndFunc

Func ExitFunc()
    ;m("ExitFunc() starts")
    Exit
EndFunc