Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Пользователь


Сообщения: 143
Благодарности: 24

Профиль | Отправить PM | Цитировать


Код: Выделить весь код
#NoTrayIcon
#include <GUIConstantsEx.au3>
#include <ModernMenuRaw.au3>
;

Opt("TrayMenuMode", 1)
Opt("TrayOnEventMode", 1)

$hTrayIcon = _TrayIconCreate("Проба")
_TrayIconSetClick(-1, 9)
_TrayIconSetState()
$nTrayMenu = _TrayCreateContextMenu()
$Line_TrayItem = _TrayCreateItem("Развернуть.")
_TrayItemSetIcon(-1, "shell32.dll", 135)
_TrayCreateItem("")
_TrayItemSetIcon(-1, "", 0)
$Exit_TrayItem = _TrayCreateItem("Выход.")
_TrayItemSetIcon(-1, "shell32.dll", 28)
_SetTrayIconBkColor(0xC46200)
_SetTraySelectBkColor(0xC46200)
_SetTraySelectTextColor(0x0000FF)
_SetTrayTextColor(0xFF0000)
_SetTrayBkColor(0x85BBDD)

$hGUI = GUICreate("Пример в трей", 300, 200)
GUISetState()

While 1
    Switch GUIGetMsg()
        Case -4
            GUISetState(@SW_HIDE)
        Case $Line_TrayItem
            ;MsgBox(0, "", "Нажато ""Развернуть.""")
	    GUISetState(@SW_SHOW)
	    GUISetState(@SW_RESTORE)
        Case $Exit_TrayItem
            _TrayIconDelete($hTrayIcon)
            Exit
     EndSwitch	
WEnd
Это сообщение посчитали полезным следующие участники:

Отправлено: 18:20, 22-12-2009 | #2