[Урок] Создание графического интерфейса - Форум Cheat-Master.ru
  • Страница 1 из 3
  • 1
  • 2
  • 3
  • »
Модератор форума: Sanoxxx, Alowir, Phoenixxx_Czar  
Форум » Программирование » AHK Программирование » [Урок] Создание графического интерфейса
[Урок] Создание графического интерфейса
Jamely Дата: Суббота, 17.08.2013, 20:21 | Сообщение # 1
Сообщений: 1603
Статус: Offline

Многие из вас задавались вопросом "Как в АНК создать свой графический интерфейс?". Именно для вас я приготовил этот урок

В AutoHotkey есть поддержка GUI (Графический пользовательский интерфейс) и сама функция, с помощью которой можно создавать окна и элементы управления, а также управлять ими. Такие окна можно использовать в качестве форм ввода данных или собственных
пользовательских интерфейсов

Для того чтобы создать интерфейс, нам понадобится программа SmartGUICreator
Скачиваем, запускаем, в сообщениях о том, что клавиша "does not exist in the current keyboard layout" нажимаем ОК
И вот перед нами рабочее пространство с клеточками размером в 10 пикселей, справа от рабочего пространства окно-информер, а сверху панель инструментов

Описание кнопок в панели инструментов:


SmartGUICreator весьма хороший инструмент для создания графических интерфейсов, не считая его немногочисленных багов (ведь программа написана на AutoHotkey)
Пробуйте создать такое окно с полем ввода и кнопкой:


После создания своего интерфейса за помощью можем обращаться в раздел Вопросы-Ответы, но для начала изучите эти две страницы: GUI и GUI Controls

У меня получился такой код:

Код
Gui, Add, Edit, x6 y7 w220 h20, Текст
Gui, Add, Button, x66 y37 w100 h30, Что я ввел?
Gui, Show, h79 w235, Мой первый интерфейс

Чтобы наш скрипт заработал как надо, а именно при нажатии кнопки выводил то, что мы ввели нужно применить опции, задающие элементам управления действия и переменные

Сразу покажу код:

Код
Gui, Add, Edit, x6 y7 w220 h20 vMyEdit, Текст
Gui, Add, Button, x66 y37 w100 h30 gMyButton, Что я ввел?
Gui, Show, h79 w235, Мой первый интерфейс
return

MyButton:
GuiControlGet, MyEdit
Msgbox, % MyEdit
return

GuiClose:
ExitApp

Слишком много информации? Сейчас все проясню

v-метка - ассоциирует переменную с элементом управления
Так, применив к указанному элементу "Edit" параметр vMyEdit, мы ассоциировали элемент с переменной MyEdit
Т.е. теперь переменная MyEdit будет значением указанного элемента "Edit"

g-метка - автоматически переходит к указанной метке, когда пользователь щелкает по элементу или изменяет его
Так, применив к указанному элементу "Button" параметр gMyButton, мы указали скрипту переходить к указанной метке, когда кнопка будет нажата
Т.е. теперь при нажатии кнопки "Что я ввел?" скрипт перейдет к метке MyButton

Идем далее...
GuiControlGet - функция получения информации указанного элемента
И так с помощью этой функции GuiControlGet, MyEdit мы получаем информацию об элементе, в котором указана ассоциация с переменной MyEdit, в эту же переменную MyEdit

Все остальное я объяснил в этом коде с комментариями:

Код
Gui, Add, Edit, x6 y7 w220 h20 vMyEdit, Текст ; Создание элемента "Edit (Поле ввода)" с ассоциацией с переменной MyEdit
Gui, Add, Button, x66 y37 w100 h30 gMyButton, Что я ввел? ; Создание элемента "Button (Кнопка)" с переходом к метке MyButton при нажатии кнопки
Gui, Show, h79 w235, Мой первый интерфейс ; Вывод окна
return ; Возвращение (дабы скрипт остановился на этом месте)

MyButton: ; Метка, вызывающаяся при нажатии кнопки "Что я ввел?"
GuiControlGet, MyEdit ; Функция получения информации о элементе, ассоциированном с переменной MyEdit
Msgbox, % MyEdit ; Вывод значения переменной MyEdit в окно сообщения
return ; Возвращение (дабы скрипт остановился на этом месте)

GuiClose: ; Метка, вызывающаяся при закрытии окна "Мой первый интерфейс"
ExitApp ; Закрытие скрипта


Автор урока: Ruskadance
Специально для Cheat-Master.Ru

Сообщение отредактировал Ruskadance - Воскресенье, 16.02.2014, 06:36
vladua100 Дата: Воскресенье, 18.08.2013, 21:25 | Сообщение # 2
Боец
Сообщений: 104
Статус: Offline
 Ruskadance, не мог бы ты написать след. туториал про то,как загружать из определ. файлов (и сохранять туда) переменные и?

P.S. уже разобрался

Добавлено (18.08.2013, 21:25)
---------------------------------------------
Не мог бы ты помочь мне с этим?А точнее с тем,как сделать там активацию по нажатию кнопок из "HotKey1","HotKey2","HotKey3"

Код

IfNotExist, %A_ScriptDir%\settings
{
FileCreateDir, %A_ScriptDir%\settings
}

IfNotExist, %A_ScriptDir%\settings\settings.profile
{
FileAppend,
(
[Text]
Text1=
Text2=
Text3=
[Hkey]
HotKey1=
HotKey2=
HotKey3=
), %A_ScriptDir%\settings\settings.profile
}

IniRead, Text1 ,%A_ScriptDir%\settings\settings.profile, Text, Text1
IniRead, Text2 ,%A_ScriptDir%\settings\settings.profile, Text, Text2
IniRead, Text3 ,%A_ScriptDir%\settings\settings.profile, Text, Text3
IniRead, HotKey1 ,%A_ScriptDir%\settings\settings.profile, Hkey, HotKey1
IniRead, HotKey2 ,%A_ScriptDir%\settings\settings.profile, Hkey, HotKey2
IniRead, HotKey3 ,%A_ScriptDir%\settings\settings.profile, Hkey, HotKey3

Gui, Add, Edit, x136 y17 w410 h20 vText1, %text1%
Gui, Add, Edit, x136 y47 w410 h20 vText2, %text2%
Gui, Add, Edit, x136 y77 w410 h20 vText3, %text3%
Gui, Add, Hotkey, x16 y17 w100 h20 vHotKey1, %HotKey1%
Gui, Add, Hotkey, x16 y47 w100 h20 vHotKey2, %HotKey2%
Gui, Add, Hotkey, x16 y77 w100 h20 vHotKey3, %HotKey3%
Gui, Add, Button, x16 y127 w100 h30 gSaveini, Save
; Generated using SmartGUI Creator 4.0
Gui, Show, x131 y89 h175 w566, New GUI Window
Return

Saveini:
GuiControlGet, Text1
IniWrite, % Text1 ,%A_ScriptDir%\settings\settings.profile, Text, Text1
GuiControlGet, Text2
IniWrite, % Text2 ,%A_ScriptDir%\settings\settings.profile, Text, Text2
GuiControlGet, Text3
IniWrite, % Text3 ,%A_ScriptDir%\settings\settings.profile, Text, Text3
GuiControlGet, HotKey1
IniWrite, % HotKey1 ,%A_ScriptDir%\settings\settings.profile, Hkey, HotKey1
GuiControlGet, HotKey2
IniWrite, % HotKey2 ,%A_ScriptDir%\settings\settings.profile, Hkey, HotKey2
GuiControlGet, HotKey3
IniWrite, % HotKey3 ,%A_ScriptDir%\settings\settings.profile, Hkey, HotKey3
return

GuiClose:
ExitApp


Я уже пытался превратить
Код

Gui, Add, Hotkey, x16 y17 w100 h20 vHotKey1, %HotKey1%
Gui, Add, Hotkey, x16 y47 w100 h20 vHotKey2, %HotKey2%
Gui, Add, Hotkey, x16 y77 w100 h20 vHotKey3, %HotKey3%

в

Код

Gui, Add, Hotkey, x16 y17 w100 h20 vHotKey1 gHotKey1, %HotKey1%
Gui, Add, Hotkey, x16 y47 w100 h20 vHotKey2 gHotKey2, %HotKey2%
Gui, Add, Hotkey, x16 y77 w100 h20 vHotKey3 gHotKey3, %HotKey3%


Код

#IfWinActive GTA:SA:MP

HotKey1:
SendMessage, 0x50,, 0x4190419,, A   
SendInput {t}%text1%{enter}
return

HotKey2:
SendMessage, 0x50,, 0x4190419,, A   
SendInput {t}%text2%{enter}
return

HotKey3:
SendMessage, 0x50,, 0x4190419,, A   
SendInput {t}%text3%{enter}
return


Но у меня после этого не получалось изменить клавишу в скрипте.

Сообщение отредактировал vladua100 - Понедельник, 19.08.2013, 21:06
Jamely Дата: Воскресенье, 18.08.2013, 21:48 | Сообщение # 3
Сообщений: 1603
Статус: Offline
 vladua100, сижу с андройда, буду с компьютера - отвечу
Фигурные скобки в подпрограммах hotkey1, hotkey2, hotkey3 убери
vladua100 Дата: Понедельник, 19.08.2013, 21:12 | Сообщение # 4
Боец
Сообщений: 104
Статус: Offline
Цитата (Ruskadance)
Фигурные скобки в подпрограммах hotkey1, hotkey2, hotkey3 убери

Убрал
Malish Дата: Четверг, 22.08.2013, 00:44 | Сообщение # 5
Бывалый
Сообщений: 390
Статус: Offline
 По больше бы твоих уроков.


Анти АФК

Сообщение отредактировал Malish - Четверг, 22.08.2013, 00:44
Jamely Дата: Четверг, 22.08.2013, 07:55 | Сообщение # 6
Сообщений: 1603
Статус: Offline
 vladua100, значит ты хочешь сделать биндер, настраиваемый на любую кнопку?
vladua100 Дата: Четверг, 22.08.2013, 10:42 | Сообщение # 7
Боец
Сообщений: 104
Статус: Offline
Цитата (Ruskadance)
vladua100, значит ты хочешь сделать биндер, настраиваемый на любую кнопку?

Да.
Jamely Дата: Четверг, 22.08.2013, 18:34 | Сообщение # 8
Сообщений: 1603
Статус: Offline
Цитата (vladua100)
Да.

Наверняка тебе поможет эта тема
vladua100 Дата: Четверг, 22.08.2013, 22:41 | Сообщение # 9
Боец
Сообщений: 104
Статус: Offline
 Помоги,пожалуйста.У меня 2 пробл. с скриптом:
1 - Если одна из 18 переменных Hkey = 0 при запуске скрипта,то он работать не будет
2 - Если в одну из переменных Text вбить значение = одному из значений Hkey (например 3),то сработает еще одна строчка,которая активируется на это значение.

Сам скрипт:

Код

IfNotExist, %A_ScriptDir%\settings.profile   
{   
FileAppend,   
(   
[Text]   
Text1 =   
Text2 =   
Text3 =   
Text4 =   
Text5 =   
Text6 =   
Text7 =   
Text8 =   
Text9 =   
Text10 =   
Text11 =   
Text12 =   
Text13 =   
Text14 =   
Text15 =   
Text16 =   
Text17 =   
Text18 =   
[Hkey]   
Hkey1 =   
Hkey2 =   
Hkey3 =   
Hkey4 =   
Hkey5 =   
Hkey6 =   
Hkey7 =   
Hkey8 =   
Hkey9 =   
Hkey10 =   
Hkey11 =   
Hkey12 =   
Hkey13 =   
Hkey14 =   
Hkey15 =   
Hkey16 =   
Hkey17 =   
Hkey18 =   
[Check]   
Check1 =0   
Check2 =0   
Check3 =0   
Check4 =0   
Check5 =0   
Check6 =0   
Check7 =0   
Check8 =0   
Check9 =0   
Check10 =0   
Check11 =0   
Check12 =0   
Check13 =0   
Check14 =0   
Check15 =0   
Check16 =0   
Check17 =0   
Check18 =0   

), %A_ScriptDir%\settings.profile   
}   

IniRead, Text1 ,%A_ScriptDir%\settings.profile, Text, Text1   
IniRead, Text2 ,%A_ScriptDir%\settings.profile, Text, Text2   
IniRead, Text3 ,%A_ScriptDir%\settings.profile, Text, Text3   
IniRead, Text4 ,%A_ScriptDir%\settings.profile, Text, Text4   
IniRead, Text5 ,%A_ScriptDir%\settings.profile, Text, Text5   
IniRead, Text6 ,%A_ScriptDir%\settings.profile, Text, Text6   
IniRead, Text7 ,%A_ScriptDir%\settings.profile, Text, Text7   
IniRead, Text8 ,%A_ScriptDir%\settings.profile, Text, Text8   
IniRead, Text9 ,%A_ScriptDir%\settings.profile, Text, Text9   
IniRead, Text10 ,%A_ScriptDir%\settings.profile, Text, Text10   
IniRead, Text11 ,%A_ScriptDir%\settings.profile, Text, Text11   
IniRead, Text12 ,%A_ScriptDir%\settings.profile, Text, Text12   
IniRead, Text13 ,%A_ScriptDir%\settings.profile, Text, Text13   
IniRead, Text14 ,%A_ScriptDir%\settings.profile, Text, Text14   
IniRead, Text15 ,%A_ScriptDir%\settings.profile, Text, Text15   
IniRead, Text16 ,%A_ScriptDir%\settings.profile, Text, Text16   
IniRead, Text17 ,%A_ScriptDir%\settings.profile, Text, Text17   
IniRead, Text18 ,%A_ScriptDir%\settings.profile, Text, Text18   

IniRead, Hkey1 ,%A_ScriptDir%\settings.profile, Hkey, Hkey1   
IniRead, Hkey2 ,%A_ScriptDir%\settings.profile, Hkey, Hkey2   
IniRead, Hkey3 ,%A_ScriptDir%\settings.profile, Hkey, Hkey3   
IniRead, Hkey4 ,%A_ScriptDir%\settings.profile, Hkey, Hkey4   
IniRead, Hkey5 ,%A_ScriptDir%\settings.profile, Hkey, Hkey5   
IniRead, Hkey6 ,%A_ScriptDir%\settings.profile, Hkey, Hkey6   
IniRead, Hkey7 ,%A_ScriptDir%\settings.profile, Hkey, Hkey7   
IniRead, Hkey8 ,%A_ScriptDir%\settings.profile, Hkey, Hkey8   
IniRead, Hkey9 ,%A_ScriptDir%\settings.profile, Hkey, Hkey9   
IniRead, Hkey10 ,%A_ScriptDir%\settings.profile, Hkey, Hkey10   
IniRead, Hkey11 ,%A_ScriptDir%\settings.profile, Hkey, Hkey11   
IniRead, Hkey12 ,%A_ScriptDir%\settings.profile, Hkey, Hkey12   
IniRead, Hkey13 ,%A_ScriptDir%\settings.profile, Hkey, Hkey13   
IniRead, Hkey14 ,%A_ScriptDir%\settings.profile, Hkey, Hkey14   
IniRead, Hkey15 ,%A_ScriptDir%\settings.profile, Hkey, Hkey15   
IniRead, Hkey16 ,%A_ScriptDir%\settings.profile, Hkey, Hkey16   
IniRead, Hkey17 ,%A_ScriptDir%\settings.profile, Hkey, Hkey17   
IniRead, Hkey18 ,%A_ScriptDir%\settings.profile, Hkey, Hkey18   

IniRead, Check1 ,%A_ScriptDir%\settings.profile, Check, Check1   
IniRead, Check2 ,%A_ScriptDir%\settings.profile, Check, Check2   
IniRead, Check3 ,%A_ScriptDir%\settings.profile, Check, Check3   
IniRead, Check4 ,%A_ScriptDir%\settings.profile, Check, Check4   
IniRead, Check5 ,%A_ScriptDir%\settings.profile, Check, Check5   
IniRead, Check6 ,%A_ScriptDir%\settings.profile, Check, Check6   
IniRead, Check7 ,%A_ScriptDir%\settings.profile, Check, Check7   
IniRead, Check8 ,%A_ScriptDir%\settings.profile, Check, Check8   
IniRead, Check9 ,%A_ScriptDir%\settings.profile, Check, Check9   
IniRead, Check10 ,%A_ScriptDir%\settings.profile, Check, Check10   
IniRead, Check11 ,%A_ScriptDir%\settings.profile, Check, Check11   
IniRead, Check12 ,%A_ScriptDir%\settings.profile, Check, Check12   
IniRead, Check13 ,%A_ScriptDir%\settings.profile, Check, Check13   
IniRead, Check14 ,%A_ScriptDir%\settings.profile, Check, Check14   
IniRead, Check15 ,%A_ScriptDir%\settings.profile, Check, Check15   
IniRead, Check16 ,%A_ScriptDir%\settings.profile, Check, Check16   
IniRead, Check17 ,%A_ScriptDir%\settings.profile, Check, Check17   
IniRead, Check18 ,%A_ScriptDir%\settings.profile, Check, Check18   

Gui, Add, Button, x6 y337 w100 h30 gSaveQB, Сохранить   
Gui, Add, Button, x366 y337 w100 h30 , Выход   
Gui, Add, Tab, x6 y7 w460 h320 , 1|2   
Gui, Tab, 1   
Gui, Add, Hotkey, x16 y47 w70 h20 gHotKey1 vHkey1, %Hkey1%     
Gui, Add, Edit, x96 y47 w320 h20 vText1, %Text1%   
Gui, Add, CheckBox, x426 y47 w20 h20 Checked%Check1% vCheck1,   
Gui, Add, Edit, x96 y77 w320 h20 vText2, %Text2%   
Gui, Add, CheckBox, x426 y77 w20 h20 Checked%Check2% vCheck2,   
Gui, Add, Hotkey, x16 y77 w70 h20 gHotKey2 vHkey2, %Hkey2%   
Gui, Add, Hotkey, x16 y107 w70 h20 gHotKey3 vHkey3, %Hkey3%   
Gui, Add, Edit, x96 y107 w320 h20 vText3, %Text3%   
Gui, Add, CheckBox, x426 y107 w20 h20 Checked%Check3% vCheck3,   
Gui, Add, Hotkey, x16 y137 w70 h20 gHotKey4 vHkey4, %Hkey4%   
Gui, Add, Edit, x96 y137 w320 h20 vText4, %Text4%   
Gui, Add, CheckBox, x426 y137 w20 h20 Checked%Check4% vCheck4,   
Gui, Add, Hotkey, x16 y167 w70 h20 gHotKey5 vHkey5, %Hkey5%   
Gui, Add, Edit, x96 y167 w320 h20 vText5, %Text5%   
Gui, Add, CheckBox, x426 y167 w20 h20 Checked%Check5% vCheck5,   
Gui, Add, Hotkey, x16 y197 w70 h20 gHotKey6 vHkey6, %Hkey6%   
Gui, Add, Edit, x96 y197 w320 h20 vText6, %Text6%   
Gui, Add, CheckBox, x426 y197 w20 h20 Checked%Check6% vCheck6,   
Gui, Add, Hotkey, x16 y227 w70 h20 gHotKey7 vHkey7, %Hkey7%   
Gui, Add, Edit, x96 y227 w320 h20 vText7, %Text7%   
Gui, Add, CheckBox, x426 y227 w20 h20 Checked%Check7% vCheck7,   
Gui, Add, Hotkey, x16 y257 w70 h20 gHotKey8 vHkey8, %Hkey8%   
Gui, Add, Edit, x96 y257 w320 h20 vText8, %Text8%   
Gui, Add, CheckBox, x426 y257 w20 h20 Checked%Check8% vCheck8,   
Gui, Add, Hotkey, x16 y287 w70 h20 gHotKey9 vHkey9, %Hkey9%   
Gui, Add, Edit, x96 y287 w320 h20 vText9, %Text9%   
Gui, Add, CheckBox, x426 y287 w20 h20 Checked%Check9% vCheck9,   
Gui, Tab, 2   
Gui, Add, Hotkey, x16 y47 w70 h20 gHotKey10 vHkey10, %Hkey10%     
Gui, Add, Edit, x96 y47 w320 h20 vText10, %Text10%   
Gui, Add, CheckBox, x426 y47 w20 h20 Checked%Check10% vCheck10,   
Gui, Add, Hotkey, x16 y77 w70 h20 gHotKey11 vHkey11, %Hkey11%   
Gui, Add, Edit, x96 y77 w320 h20 vText11, %Text11%   
Gui, Add, CheckBox, x426 y77 w20 h20 Checked%Check11% vCheck11,   
Gui, Add, Hotkey, x16 y107 w70 h20 gHotKey12 vHkey12, %Hkey12%   
Gui, Add, Edit, x96 y107 w320 h20 vText12, %Text12%   
Gui, Add, CheckBox, x426 y107 w20 h20 Checked%Check12% vCheck12,   
Gui, Add, Hotkey, x16 y137 w70 h20 gHotKey13 vHkey13, %Hkey13%     
Gui, Add, Edit, x96 y137 w320 h20 vText13, %Text13%     
Gui, Add, CheckBox, x426 y137 w20 h20 Checked%Check13% vCheck13,   
Gui, Add, Hotkey, x16 y167 w70 h20 gHotKey14 vHkey14, %Hkey14%   
Gui, Add, Edit, x96 y167 w320 h20 vText14, %Text14%   
Gui, Add, CheckBox, x426 y167 w20 h20 Checked%Check14% vCheck14,   
Gui, Add, Hotkey, x16 y197 w70 h20 gHotKey15 vHkey15, %Hkey15%   
Gui, Add, Edit, x96 y197 w320 h20 vText15, %Hkey15%   
Gui, Add, CheckBox, x426 y197 w20 h20 Checked%Check15% vCheck15,   
Gui, Add, Hotkey, x16 y227 w70 h20 gHotKey16 vHkey16, %Hkey16%   
Gui, Add, Edit, x96 y227 w320 h20 vText16, %Text16%   
Gui, Add, CheckBox, x426 y227 w20 h20 Checked%Check16% vCheck16,   
Gui, Add, Edit, x96 y257 w320 h20 vText17, %Text17%   
Gui, Add, CheckBox, x426 y257 w20 h20 Checked%Check17% vCheck17,   
Gui, Add, Hotkey, x16 y257 w70 h20 gHotKey17 vHkey17, %Hkey17%   
Gui, Add, Hotkey, x16 y287 w70 h20 gHotKey18 vHkey18, %Hkey18%   
Gui, Add, Edit, x96 y287 w320 h20 vText18, %Text18%   
Gui, Add, CheckBox, x426 y287 w20 h20 Checked%Check18% vCheck18,   

Hotkey, %Hkey1%, Act1, On   
Hotkey, %Hkey2%, Act2, On   
Hotkey, %Hkey3%, Act3, On   
Hotkey, %Hkey4%, Act4, On   
Hotkey, %Hkey5%, Act5, On   
Hotkey, %Hkey6%, Act6, On   
Hotkey, %Hkey7%, Act7, On   
Hotkey, %Hkey8%, Act8, On   
Hotkey, %Hkey9%, Act9, On   
Hotkey, %Hkey10%, Act10, On   
Hotkey, %Hkey11%, Act11, On   
Hotkey, %Hkey12%, Act12, On   
Hotkey, %Hkey13%, Act13, On   
Hotkey, %Hkey14%, Act14, On   
Hotkey, %Hkey15%, Act15, On   
Hotkey, %Hkey16%, Act16, On   
Hotkey, %Hkey17%, Act17, On   
Hotkey, %Hkey18%, Act18, On   

PrevKey1 := Hkey1   
PrevKey2 := Hkey2   
PrevKey3 := Hkey3   
PrevKey4 := Hkey4   
PrevKey5 := Hkey5   
PrevKey6 := Hkey6   
PrevKey7 := Hkey7   
PrevKey8 := Hkey8   
PrevKey9 := Hkey9   
PrevKey10 := Hkey10   
PrevKey11 := Hkey11   
PrevKey12 := Hkey12   
PrevKey13 := Hkey13   
PrevKey14 := Hkey14   
PrevKey15 := Hkey15   
PrevKey16 := Hkey16   
PrevKey17 := Hkey17   
PrevKey18 := Hkey18   

Gui, Show, x131 y91 h377 w477, New GUI Window   
Return   

HotKey1:   
HotKey2:   
HotKey3:   
HotKey4:   
HotKey5:   
HotKey6:   
HotKey7:   
HotKey8:   
HotKey9:   
HotKey10:   
HotKey11:   
HotKey12:   
HotKey13:   
HotKey14:   
HotKey15:   
HotKey16:   
HotKey17:   
HotKey18:   
       n := SubStr(A_ThisLabel, 0)   
       Hotkey, % PrevKey%n%, Off   
       Hotkey, % Hkey%n%, Act%n%, On UseErrorLevel   
       if !ErrorLevel   
          PrevKey%n% := Hkey%n%   
       return   

SaveQB:   
GuiControlGet, Text1   
IniWrite, % Text1 ,%A_ScriptDir%\settings.profile, Text, Text1   
GuiControlGet, Text2   
IniWrite, % Text2 ,%A_ScriptDir%\settings.profile, Text, Text2   
GuiControlGet, Text3   
IniWrite, % Text3 ,%A_ScriptDir%\settings.profile, Text, Text3   
GuiControlGet, Text4   
IniWrite, % Text4 ,%A_ScriptDir%\settings.profile, Text, Text4   
GuiControlGet, Text5   
IniWrite, % Text5 ,%A_ScriptDir%\settings.profile, Text, Text5   
GuiControlGet, Text6   
IniWrite, % Text6 ,%A_ScriptDir%\settings.profile, Text, Text6   
GuiControlGet, Text7   
IniWrite, % Text7 ,%A_ScriptDir%\settings.profile, Text, Text7   
GuiControlGet, Text8   
IniWrite, % Text8 ,%A_ScriptDir%\settings.profile, Text, Text8   
GuiControlGet, Text9   
IniWrite, % Text9 ,%A_ScriptDir%\settings.profile, Text, Text9   
GuiControlGet, Text10   
IniWrite, % Text10 ,%A_ScriptDir%\settings.profile, Text, Text10   
GuiControlGet, Text11   
IniWrite, % Text11 ,%A_ScriptDir%\settings.profile, Text, Text11   
GuiControlGet, Text12   
IniWrite, % Text12 ,%A_ScriptDir%\settings.profile, Text, Text12   
GuiControlGet, Text13   
IniWrite, % Text13 ,%A_ScriptDir%\settings.profile, Text, Text13   
GuiControlGet, Text14   
IniWrite, % Text14 ,%A_ScriptDir%\settings.profile, Text, Text14   
GuiControlGet, Text15   
IniWrite, % Text15 ,%A_ScriptDir%\settings.profile, Text, Text15   
GuiControlGet, Text16   
IniWrite, % Text16 ,%A_ScriptDir%\settings.profile, Text, Text16   
GuiControlGet, Text17   
IniWrite, % Text17 ,%A_ScriptDir%\settings.profile, Text, Text17   
GuiControlGet, Text18   
IniWrite, % Text18 ,%A_ScriptDir%\settings.profile, Text, Text18   

GuiControlGet, Hkey1   
IniWrite, % Hkey1 ,%A_ScriptDir%\settings.profile, Hkey, Hkey1   
GuiControlGet, Hkey2   
IniWrite, % Hkey2 ,%A_ScriptDir%\settings.profile, Hkey, Hkey2   
GuiControlGet, Hkey3   
IniWrite, % Hkey3 ,%A_ScriptDir%\settings.profile, Hkey, Hkey3   
GuiControlGet, Hkey4   
IniWrite, % Hkey4 ,%A_ScriptDir%\settings.profile, Hkey, Hkey4   
GuiControlGet, Hkey5   
IniWrite, % Hkey5 ,%A_ScriptDir%\settings.profile, Hkey, Hkey5   
GuiControlGet, Hkey6   
IniWrite, % Hkey6 ,%A_ScriptDir%\settings.profile, Hkey, Hkey6   
GuiControlGet, Hkey7   
IniWrite, % Hkey7 ,%A_ScriptDir%\settings.profile, Hkey, Hkey7   
GuiControlGet, Hkey8   
IniWrite, % Hkey8 ,%A_ScriptDir%\settings.profile, Hkey, Hkey8   
GuiControlGet, Hkey9   
IniWrite, % Hkey9 ,%A_ScriptDir%\settings.profile, Hkey, Hkey9   
GuiControlGet, Hkey10   
IniWrite, % Hkey10 ,%A_ScriptDir%\settings.profile, Hkey, Hkey10   
GuiControlGet, Hkey11   
IniWrite, % Hkey11 ,%A_ScriptDir%\settings.profile, Hkey, Hkey11   
GuiControlGet, Hkey12   
IniWrite, % Hkey12 ,%A_ScriptDir%\settings.profile, Hkey, Hkey12   
GuiControlGet, Hkey13   
IniWrite, % Hkey13 ,%A_ScriptDir%\settings.profile, Hkey, Hkey13   
GuiControlGet, Hkey14   
IniWrite, % Hkey14 ,%A_ScriptDir%\settings.profile, Hkey, Hkey14   
GuiControlGet, Hkey15   
IniWrite, % Hkey15 ,%A_ScriptDir%\settings.profile, Hkey, Hkey15   
GuiControlGet, Hkey16   
IniWrite, % Hkey16 ,%A_ScriptDir%\settings.profile, Hkey, Hkey16   
GuiControlGet, Hkey17   
IniWrite, % Hkey17 ,%A_ScriptDir%\settings.profile, Hkey, Hkey17   
GuiControlGet, Hkey18   
IniWrite, % Hkey18 ,%A_ScriptDir%\settings.profile, Hkey, Hkey18   

GuiControlGet, Check1   
IniWrite, % Check1 ,%A_ScriptDir%\settings.profile, Check, Check1   
GuiControlGet, Check2   
IniWrite, % Check2 ,%A_ScriptDir%\settings.profile, Check, Check2   
GuiControlGet, Check3   
IniWrite, % Check3 ,%A_ScriptDir%\settings.profile, Check, Check3   
GuiControlGet, Check4   
IniWrite, % Check4 ,%A_ScriptDir%\settings.profile, Check, Check4   
GuiControlGet, Check5   
IniWrite, % Check5 ,%A_ScriptDir%\settings.profile, Check, Check5   
GuiControlGet, Check6   
IniWrite, % Check6 ,%A_ScriptDir%\settings.profile, Check, Check6   
GuiControlGet, Check7   
IniWrite, % Check7 ,%A_ScriptDir%\settings.profile, Check, Check7   
GuiControlGet, Check8   
IniWrite, % Check8 ,%A_ScriptDir%\settings.profile, Check, Check8   
GuiControlGet, Check9   
IniWrite, % Check9 ,%A_ScriptDir%\settings.profile, Check, Check9   
GuiControlGet, Check10   
IniWrite, % Check10 ,%A_ScriptDir%\settings.profile, Check, Check10   
GuiControlGet, Check11   
IniWrite, % Check11 ,%A_ScriptDir%\settings.profile, Check, Check11   
GuiControlGet, Check12   
IniWrite, % Check12 ,%A_ScriptDir%\settings.profile, Check, Check12   
GuiControlGet, Check13   
IniWrite, % Check13 ,%A_ScriptDir%\settings.profile, Check, Check13   
GuiControlGet, Check14   
IniWrite, % Check14 ,%A_ScriptDir%\settings.profile, Check, Check14   
GuiControlGet, Check15   
IniWrite, % Check15 ,%A_ScriptDir%\settings.profile, Check, Check15   
GuiControlGet, Check16   
IniWrite, % Check16 ,%A_ScriptDir%\settings.profile, Check, Check16   
GuiControlGet, Check17   
IniWrite, % Check17 ,%A_ScriptDir%\settings.profile, Check, Check17   
GuiControlGet, Check18   
IniWrite, % Check18 ,%A_ScriptDir%\settings.profile, Check, Check18   
return   

Act1:   
if Check1 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text1%{enter}   
return   
}   
If Check1 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text1%{space}   
}   
return   

Act2:   
if Check2 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text2%{enter}   
return   
}   
If Check2 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text2%{space}   
}   
return   

Act3:   
if Check3 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text3%{enter}   
return   
}   
If Check3 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text3%{space}   
}   
return   

Act4:   
if Check4 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text4%{enter}   
return   
}   
If Check4 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text3%{space}   
}   
return   

Act5:   
if Check5 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text5%{enter}   
return   
}   
If Check5 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text5%{space}   
}   
return   

Act6:   
if Check6 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text6%{enter}   
return   
}   
If Check6 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text6%{space}   
}   
return   

Act7:   
if Check7 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text7%{enter}   
return   
}   
If Check7 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text7%{space}   
}   
return   

Act8:   
if Check8 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text8%{enter}   
return   
}   
If Check8 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text8%{space}   
}   
return   

Act9:   
if Check9 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text9%{enter}   
return   
}   
If Check9 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text9%{space}   
}   
return   

Act10:   
if Check10 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text1%{enter}   
return   
}   
If Check10 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text10%{space}   
}   
return   

Act11:   
if Check11 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text11%{enter}   
return   
}   
If Check11 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text11%{space}   
}   
return   

Act12:   
if Check12 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text12%{enter}   
return   
}   
If Check12 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text12%{space}   
}   
return   

Act13:   
if Check13 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text13%{enter}   
return   
}   
If Check13 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text13%{space}   
}   
return   

Act14:   
if Check14 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text14%{enter}   
return   
}   
If Check14 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text14%{space}   
}   
return   

Act15:   
if Check15 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text15%{enter}   
return   
}   
If Check15 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text15%{space}   
}   
return   

Act16:   
if Check16 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text16%{enter}   
return   
}   
If Check16 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text16%{space}   
}   
return   

Act17:   
if Check17 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text17%{enter}   
return   
}   
If Check17 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text17%{space}   
}   
return   

Act18:   
if Check18 = 1   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text18%{enter}   
return   
}   
If Check18 = 0   
{   
SendMessage, 0x50,, 0x4190419,, A     
SendInput {t}%Text18%{space}   
}   
return   

GuiClose:   
ExitApp   

Сообщение отредактировал vladua100 - Пятница, 23.08.2013, 09:31
Jamely Дата: Среда, 09.10.2013, 13:52 | Сообщение # 10
Сообщений: 1603
Статус: Offline
 up
Stepan-Horolsky Дата: Четверг, 16.01.2014, 18:49 | Сообщение # 11
Любитель
Сообщений: 48
Статус: Offline
 Я вообще не понел, помогите мне. Как склеить gui и обычный скрипт.
Код
InputBox, 1111,
Numpad0::   
TrollFace:   
sendinput, {F6}%1111%{Enter}   
Sleep, 1100   
Goto, TrollFace   
Numpad4::Pause

Код
Gui, Add, Picture, x-8 y0 w350 h220 , C:\Users\Stepan\Desktop\заставка для ahk.jpg
Gui, Add, Text, x-1 y180 w140 h60 , активация Numpad0 деактивация Numpad4
Gui, Add, Button, x32 y60 w100 h100 , ЖМИ БРАТ
; Generated using SmartGUI Creator 4.0
Gui, Show, x274 y190 h222 w341, capture
Return

GuiClose:
ExitApp

Сообщение отредактировал Stepan-Horolsky - Четверг, 16.01.2014, 23:41
Artem_Buero Дата: Пятница, 17.01.2014, 00:05 | Сообщение # 12
Сообщений: 4223
Статус: Offline
 Stepan-Horolsky,
К этому
Код
Gui, Add, Picture, x-8 y0 w350 h220 , C:\Users\Stepan\Desktop\заставка для ahk.jpg
Gui, Add, Text, x-1 y180 w140 h60 , активация Numpad0 деактивация Numpad4
Gui, Add, Button, x32 y60 w100 h100 , ЖМИ БРАТ
; Generated using SmartGUI Creator 4.0
Gui, Show, x274 y190 h222 w341, capture
Return

GuiClose:
ExitApp

добавь потом

Код
ButtonЖМИБРАТ:
InputBox, 1111,  
TrollFace:    
sendinput, {F6}%1111%{Enter}    
Sleep, 1100    
Goto, TrollFace   
return
Numpad4::Pause
МОЙ ВК - https://vk.com/gospodin_buero
Stepan-Horolsky Дата: Пятница, 17.01.2014, 00:14 | Сообщение # 13
Любитель
Сообщений: 48
Статус: Offline
Цитата Artem_Buero ()
Stepan-Horolsky,
К этому
Код
Gui, Add, Picture, x-8 y0 w350 h220 , C:\Users\Stepan\Desktop\заставка для ahk.jpg
Gui, Add, Text, x-1 y180 w140 h60 , активация Numpad0 деактивация Numpad4
Gui, Add, Button, x32 y60 w100 h100 , ЖМИ БРАТ
; Generated using SmartGUI Creator 4.0
Gui, Show, x274 y190 h222 w341, capture
Return

GuiClose:
ExitApp

добавь потом

Код
ButtonЖМИБРАТ:
InputBox, 1111,  
TrollFace:    
sendinput, {F6}%1111%{Enter}    
Sleep, 1100    
Goto, TrollFace   
return
Numpad4::Pause



Ну чет по легкой понел
Artem_Buero Дата: Пятница, 17.01.2014, 00:31 | Сообщение # 14
Сообщений: 4223
Статус: Offline
 Stepan-Horolsky, Почитай урок внимательно тут очень хорошо описано что и как
МОЙ ВК - https://vk.com/gospodin_buero
Jamely Дата: Пятница, 17.01.2014, 13:51 | Сообщение # 15
Сообщений: 1603
Статус: Offline
 up
Форум » Программирование » AHK Программирование » [Урок] Создание графического интерфейса
  • Страница 1 из 3
  • 1
  • 2
  • 3
  • »
Поиск:
Статистика Форума
Последнии темы
Жалоба на [CM]Буррито[x2...
Hwid spoofer | anti...
✅ Купить / Продать вирты...
Вирты Samp rp Legacy для...
Вирты Samp rp
Project L33T чит, аимбот...
Обновление
⏮⏮⛔⛔⛔⛔⛔ПРОДАЖА✅ПОКУПКА✅ ...
⏮⛔⛔⛔⛔ПРОДАЖА✅ПОКУПКА✅ ВИ...
Студия "Лидер"
✅✅✅ПРОДАЖА ВИРТОВ SAMP/C...
Smite 2 чит, аимбот, esp...
Читаемые темы
Курилка [10000]
[0.3z][RUS] S0beit mo... [9991]
Поиск CLEO скриптов &... [9977]
Флудильная [9936]
Курилка [9688]
RakBot - Качай аккаун... [9653]
Курилка [9614]
Общение читеров [CM] [9523]
S0beit - pr9n project... [9501]
Часто задаваемые вопр... [8268]
ПОКУПАЮ/ПРОДАЮ ♚SAMP♚... [6360]
[0.3.7][RUS] Sobeit m... [6250]
[FREE] AntiAFK_R 3.4.... [6220]
Лучшие пользователи
Admin [39113]
GеNius [7210]
[CM]Russel [5557]
kenlo763 [4952]
[CM]AGRESSOR [4639]
Snake_Firm [4452]
Сэс [4416]
Artem_Buero [4223]
[CM]Durman [3204]
[CM]Рафаэль [3080]
iMaddy [2855]
sky_Woker [2854]
getrekt [2745]
Новые пользователи
cristinazi1 [01:43]
iamboyt [01:09]
vgnluhvguud [14:29]
Bruno1979 [10:18]
zelmasa9 [20:51]
tanishabs2 [22:33]
Ramil0579 [16:57]
KitchenAidywk [02:21]
Valley228228 [22:56]
Emiliones [21:45]
alexandrasa18 [03:42]
josephip4 [23:32]
IskraExchange [23:12]