enjoycode

#Include #NoTrayIcon Dim $ini = @ScriptDir & "\Data.ini" Opt("TrayMenuMode",1) Local $Menus = IniReadSectionNames($ini) For $i=1 To $Menus[0] TrayCreateMenu($Menus[$i]) Next TraySetState() While 1 $msg = TrayGetMsg() Select Case $msg = 0 ContinueLoop Case $msg = $prefsitem Msgbox(64, "Preferences:", "OS:" & @OSVersion) Case $msg = $aboutitem Msgbox(64, "About:", "AutoIt3-Tray-sample.") Case $msg..

#Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Icon=..\..\Ikoner\Flotte Ikoner\Icon 110.ico #AutoIt3Wrapper_Outfile=Launcher.exe #AutoIt3Wrapper_Res_Fileversion=1.0.0.0 #AutoIt3Wrapper_Add_Constants=n #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #include #include #include #include #include #include #include #include #include #include #include Opt("G..