AutoIt: 3.2.8.1
Версия: 1.0
Категория: Элементы GUI
Описание: При помощи клика на кнопке в окне программы, запускает соответствующий ярлик (путь к ярлыку: @ScriptDir & "\Launchers" ;)) приложения User'a.
На кнопке отображается иконка запускаемого приложения User'a .
Код:
Файл: DTI Runer.au3
Снимок:
Источник: http://autoit-script.ru
Автор: VasiliuS
P.S. Разумеется все пути добавляемых файлов придётся переписывать :(
И просьба не осуждать меня за использование программы Koda, так как я изучаю AutoIt только третий день
Все предложения и замечания принимаются с радостью так как знание AutoIt = 0.1% :-[
Замечу: Приложения писалось с целью получения навыков работы с GUI и упрощения доступа к ярлыкам определённой группы приложений.
Версия: 1.0
Категория: Элементы GUI
Описание: При помощи клика на кнопке в окне программы, запускает соответствующий ярлик (путь к ярлыку: @ScriptDir & "\Launchers" ;)) приложения User'a.
На кнопке отображается иконка запускаемого приложения User'a .
Код:
Код:
#include <GUIConstants.au3>
#Region ### START Koda GUI section ###
$DTI_AutoIt_Runer = GUICreate("DTI_AutoIt_Runer", 335, 522, 193, 125)
GUISetBkColor(0xD4D0C8)
$SciTEScriptEditor = GUICtrlCreateButton("(Not allowed)", 15, 15, 105, 105, $BS_ICON, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
GUICtrlSetImage(-1, "C:\Program Files\AutoIt3\SciTE\SciTE.exe", 0)
$FD = GUICtrlCreateButton("(Not allowed)", 214, 15, 105, 105, $BS_ICON, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
GUICtrlSetImage(-1, "C:\Data\AutoIt Utilites\Koda\FD.exe", 0)
$CodeWizard = GUICtrlCreateButton("(Not allowed)", 15, 186, 105, 105, $BS_ICON, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
GUICtrlSetImage(-1, "C:\Data\AutoIt Utilites\CodeWizard\CodeWizard.exe", 0)
$AU3Record = GUICtrlCreateButton("(Not allowed)", 214, 186, 105, 105, $BS_ICON, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
GUICtrlSetImage(-1, "C:\Data\AutoIt Utilites\ScriptWriter\AU3Record.exe", 1)
$Compiller = GUICtrlCreateButton("(Not allowed)", 15, 347, 105, 105, $BS_ICON, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
GUICtrlSetImage(-1, "C:\Program Files\AutoIt3\Aut2Exe\Aut2exe.exe", 0)
$SciTE_Text = GUICtrlCreateLabel("SciTEScriptEditor", 12, 128, 136, 33)
GUICtrlSetFont(-1, 18, 400, 0, "Mistral")
$Koda_Text = GUICtrlCreateLabel("Koda", 248, 128, 42, 33)
GUICtrlSetFont(-1, 18, 400, 0, "Mistral")
$CodeWizard_Text = GUICtrlCreateLabel("CodeWizard", 16, 296, 95, 33)
GUICtrlSetFont(-1, 18, 400, 0, "Mistral")
$AU3Record_Text = GUICtrlCreateLabel("AU3Record", 224, 296, 86, 33)
GUICtrlSetFont(-1, 18, 400, 0, "Mistral")
$Compiller_Text = GUICtrlCreateLabel("Compiller", 24, 456, 81, 33)
GUICtrlSetFont(-1, 18, 400, 0, "Mistral")
$Exit = GUICtrlCreateIcon(@ScriptDir & "\Launchers\Exit.ico", 0, 294, 475, 32, 32, BitOR($SS_NOTIFY,$WS_GROUP))
GUICtrlSetCursor (-1, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $SciTEScriptEditor
Switch $nMsg
Case $nMsg = $SciTEScriptEditor
ShellExecute("SciTE Script Editor", "", @ScriptDir & "\Launchers", "open")
EndSwitch
Case $FD
Switch $nMsg
Case $nMsg = $FD
ShellExecute("FD", "", @ScriptDir & "\Launchers", "open")
EndSwitch
Case $CodeWizard
Switch $nMsg
Case $nMsg = $CodeWizard
ShellExecute("CodeWizard", "", @ScriptDir & "\Launchers", "open")
EndSwitch
Case $AU3Record
Switch $nMsg
Case $nMsg = $AU3Record
ShellExecute("AU3Record", "", @ScriptDir & "\Launchers", "open")
EndSwitch
Case $Compiller
Switch $nMsg
Case $nMsg = $Compiller
ShellExecute("Compile Script to exe", "", @ScriptDir & "\Launchers", "open")
EndSwitch
Case $Exit
Switch $nMsg
Case $nMsg = $Exit
Exit
EndSwitch
EndSwitch
WEnd
Файл: DTI Runer.au3
Снимок:
Источник: http://autoit-script.ru
Автор: VasiliuS
P.S. Разумеется все пути добавляемых файлов придётся переписывать :(
И просьба не осуждать меня за использование программы Koda, так как я изучаю AutoIt только третий день
Все предложения и замечания принимаются с радостью так как знание AutoIt = 0.1% :-[
Замечу: Приложения писалось с целью получения навыков работы с GUI и упрощения доступа к ярлыкам определённой группы приложений.