-
AutoIt
(
http://forum.oszone.net/forumdisplay.php?f=103)
Можноли в Autoite отредактировать значок скрипта который появляеться в сис.трее?
Я имею виду можно ли туда добавить функции и т.д.? И как это делать?
|
Вложений: 1
Смотри в справке описание, и пример к функции: TrayCreateItem.
А вот, если хочется это сделать красивее:
Код:
#NoTrayIcon
#include <ModernMenuRaw.au3>
$hTrayIcon = _TrayIconCreate("My Tray App")
_TrayIconSetClick(-1, 9)
_TrayIconSetState()
$nTrayMenu = _TrayCreateContextMenu()
$Calc_TrayItem = _TrayCreateItem("Калькулятор")
_TrayItemSetIcon(-1, "calc.exe", 0)
$Word_TrayItem = _TrayCreateItem("MS Word")
_TrayItemSetIcon(-1, @ProgramFilesDir &"\Microsoft Office\Office12\WINWORD.EXE", 0)
$Notepad_TrayItem = _TrayCreateItem("Блокнот")
_TrayItemSetIcon(-1, "notepad.exe", 0)
$CmdLine_TrayItem = _TrayCreateItem("Коммандная строка")
_TrayItemSetIcon(-1, "cmd.exe", 0)
$MSPaint_TrayItem = _TrayCreateItem("MSPaint")
_TrayItemSetIcon(-1, "mspaint.exe", 0)
_TrayCreateItem("")
_TrayItemSetIcon(-1, "", 0)
$Exit_TrayItem = _TrayCreateItem("Выход")
_TrayItemSetIcon(-1, "shell32.dll", 28)
_SetTrayIconBkColor(0xC46200)
_SetTraySelectBkColor(0x087272)
_SetTraySelectTextColor(0xFFFFFF)
While 1
Switch GUIGetMsg()
Case $Calc_TrayItem
Run("Calc.exe")
Case $Notepad_TrayItem
Run("Notepad.exe")
Case $CmdLine_TrayItem
Run("Cmd.exe")
Case $MSPaint_TrayItem
Run("MSPaint.exe")
Case $Word_TrayItem
Run (@ProgramFilesDir &"\Microsoft Office\Office12\WINWORD.EXE")
Case $Exit_TrayItem
_TrayIconDelete($hTrayIcon)
Exit
EndSwitch
WEnd
Для работы скрипта нужна библиотека ModernMenuRaw.au3
|
Цитата:
Цитата beve
А вот, если хочется это сделать красивее »
|
Гыы, прикольно! :)
А что делает _TrayIconSetClick? Я не понял из кода.
|
Цитата:
Цитата evg64
А что делает _TrayIconSetClick? Я не понял из кода. »
|
Смотри в справке описание функции: TraySetClick . (Сдесь используется в _TrayIconSetClick(-1, 9) - 9 что означает 1 = Pressing primary mouse button + 8 = Pressing secondary mouse button, иными словами при клике на значке в сист.трее левой или правой клавишей мышки, появится трей-меню. (А функция _TrayIconSetClick из библиотеки ModernMenuRaw.au3)
|
Код:
TraySetIcon('iconpath')
|
Подскажите, как вставить сюда этот скрипт
#RequireAdmin
;Добавляем программу в автозапуск
If RegRead("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", @ScriptName) = "" Then _
RegWrite("HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", @ScriptName, "REG_SZ", '"' & @ScriptFullPath & '"')
;Указываем программу на запуск
$sApp = "notepad.exe"
;Указываем число запуска
$nDay = 16
While 1
If @MDAY = $nDay Then
Run($sApp)
While @MDAY = $nDay
Sleep(60000)
WEnd
EndIf
Sleep(1000)
WEnd
Уже все перепробовал но у меня не раб кнопка Выход, спасибо!
|
Цитата:
Цитата Anarasius
как вставить сюда этот скрипт »
|
Куда сюда? И код нужно заключать в соот-вующие теги.
Вопрос был в том, как поменять значок скрипта в трее, вам дали короткий и верный ответ - используйте TraySetIcon.
|
Время: 12:10.
© OSzone.net 2001-