GUIOnEventMode mit der ModernMenu.au3 nutzen?

[autoit]

#cs ----------------------------------------------------------------------------

[/autoit] [autoit][/autoit] [autoit]

AutoIt Version: 3.3.2.0
Author: myName

[/autoit] [autoit][/autoit] [autoit]

Script Function:
Template AutoIt script.

[/autoit] [autoit][/autoit] [autoit]

#ce ----------------------------------------------------------------------------

[/autoit] [autoit][/autoit] [autoit]

; Script Start - Add your code below here

[/autoit] [autoit][/autoit] [autoit]

#NoTrayIcon
#include <ModernMenuRaw.au3>
#include <GUIConstantsEx.au3>

[/autoit] [autoit][/autoit] [autoit]

;~ Opt("GUIOnEventMode", 1)

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

$Form1 = GUICreate("Form1", 363, 250, 454, 319)
GUISetState(@SW_SHOW)

[/autoit] [autoit][/autoit] [autoit]

;Traymenu erstellen.
SetStandardColors()

[/autoit] [autoit][/autoit] [autoit]

$TrayIcon_Handle = _TrayIconCreate("", "shell32.dll", -132, "_TrayDoubleClick")
_TrayIconSetClick(-1, 16)

[/autoit] [autoit][/autoit] [autoit]

_TrayCreateContextMenu()

[/autoit] [autoit][/autoit] [autoit]

$Traymenu_Item_Click = _TrayCreateItem("Klick mich!!!!!")
_TrayItemSetIcon($Traymenu_Item_Click, @AutoItExe)

[/autoit] [autoit][/autoit] [autoit]

_TrayIconSetState()

[/autoit] [autoit][/autoit] [autoit]

While 1
$GetMsg = GUIGetMsg(1)
Switch $GetMsg[1]
Case $Form1
Switch $GetMsg[0]
Case $GUI_EVENT_CLOSE
_TrayIconDelete($TrayIcon_Handle)
Exit
EndSwitch
Case Else
Switch $GetMsg[0]
Case $Traymenu_Item_Click
MsgBox(0, "", "Wie geht das in der GUIOnEventMode???")
_TrayIconDelete($TrayIcon_Handle)
Exit
EndSwitch
EndSwitch
WEnd

[/autoit]