Здравствуйте. Как сделать что бы при выборе сайта из списка, и при нажатие кнопки Запуск игры - она запускалась, а при нажатие кнопки Регистрация переходило на сайт. Точнее осталось только повесить на эту же ссылку путь к исполняемому файлу, и что бы его там не было видно.
Возможно это было сделать через какую то другую функцию, но я только 2 дня этим занимаюсь, и похожей темы не нашел.
Код:
#Include <GUIConstants.au3>
#include <ListBoxConstants.au3>
Launcher()
Func Launcher()
$settings = "test.ini"
$Site1 = IniRead($settings, "Site", "Site1", "")
$Program1 = IniRead($settings, "Program", "Program1", "")
GUICreate('Launcher', 350, 640, -1, -1, 0, 0)
GUICtrlCreatePic(@ScriptDir & '\test.jpg', 0, 0, 345, 640)
GUICtrlSetState(-1, $GUI_DISABLE)
GUISetState()
$Mylist = GUICtrlCreateList("", 82, 300, 180, 200, BitAND($GUI_SS_DEFAULT_LIST, BitNOT($LBS_SORT)))
$link1 = GUICtrlSetData($MyList, $site1)
Opt("GUICoordMode", 2)
$Button_1 = GUICtrlCreateButton("Запуск игры", -140, 0, 100, 25)
$Button_2 = GUICtrlCreateButton("Регистрация", -100, 10)
$Button_3 = GUICtrlCreateButton("Выход", -100, 10)
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $Button_1
Run(GUICtrlRead($Mylist))
Case $msg = $Button_2
ShellExecute(GUICtrlRead($Mylist))
Case $msg = $Button_3
exit
EndSelect
WEnd
EndFunc
Возможно это было сделать через какую то другую функцию, но я только 2 дня этим занимаюсь, и похожей темы не нашел.