; Holger
; http://www.autoitscript.com/forum/topic/20967-guitray-menu-with-icons-and-colors/
#include <ModernMenuRaw.au3>

$hGui = GUICreate("Боковая панель меню", 300, 200)

$iFileMenu = GUICtrlCreateMenu("&Файл")
_SetMenuIconBkColor(0x88DD88)
_SetMenuIconBkGrdColor(0xEEFFEE)

For $i = 1 To 5
	_GUICtrlCreateODMenuItem("Пункт " & $i, $iFileMenu, "shell32.dll", -$i - 21)
Next
GUISetState()
Send('^{F10}{Enter}')
Do
Until GUIGetMsg() = -3