Скрипт в трее

[Draconit]

Здравствуйте! Помогите пожалуйста новичку. Пишу небольшой скрипт, и мне необходимо чтобы он после запуска оставался в трее и выполнял определенные действия (неважно какие) только при нажатии кнопки. Подскажите, как это лучше реализовать.
Заранее спасибо.

 

[Zaramot]

Так ?:

;#include <Constants.au3>
Opt('TrayMenuMode', 1)
Opt('TrayAutoPause', 0)

While 1
	Switch TrayGetMsg()
		Case -8 ;$TRAY_EVENT_PRIMARYUP
			MsgBox(0, 'TEST', 'test')
		Case -10 ;$TRAY_EVENT_SECONDARYUP
			Exit
	EndSwitch
WEnd

 

[madmasles]

Zaramot [?]

;...
Case -8
;...

Есть же константы для этого. Они понятнее, ИМХО.

#include <Constants.au3>
;...
Case $TRAY_EVENT_PRIMARYUP
;...

 

[Zaramot]

madmasles
Подключать лишний инклуд ради подмены 2-х цифр смысл не вижу, да и мне так удобней.

P.S Отредактировал предыдущий пост.

 

[CreatoR]

Zaramot [?]

Подключать лишний инклуд ради подмены 2-х цифр смысл не вижу

А он есть. Почитай про магическое число (у нас на форуме).

 

[AZJIO]

На офсайте guinness выкладывал скрипт автоподмены констант реальными значениями. В других компилируемых языка использование констант не влияет на скорость, так как после компиляции все константы превратятся в реальные числа, у нас же будет запрос значения константы, в итоге основной цикл GUI 100 раз в секунду анализирует константы и запрашивает их значение.

 

[Draconit]

У меня OS Windows 7 x64 и данный скрипт работает только если курсор мыши навести на значок в трее. А можно чтобы отслеживал не только если курсор на иконке, или не обязательно нажатие на кнопку мыши, можно и на клавиатуре.

 

[MnM]

кнопку мыши, можно и на клавиатуре.

;#include <Constants.au3>
Opt('TrayMenuMode', 1)
Opt('TrayAutoPause', 0)
HotKeySet("^!a","__Fun");Ctrl+Alt+a
While 1
    Switch TrayGetMsg()
        Case -8 ;$TRAY_EVENT_PRIMARYUP
            __Fun()
        Case -10 ;$TRAY_EVENT_SECONDARYUP
            Exit
    EndSwitch
WEnd
Func __Fun()
	MsgBox(0, 'TEST', 'test')
EndFunc

 

[Draconit]

Спасибо, помогли.