Тема: AHK: Подпрограмма кнопки в GUI
Проблема в том, что в последнем окне не работают кнопки. Пытался найти причину эту, но не смог. Выяснил одно: если
заменить кнопку в 6ом окне
Gui, 6: Add, Button, w242 yp+22 xp-6, Продолжить
Gui, 6: show
return
6ButtonПродолжить:
на
Gui, 6:show
sleep 2000
goto, Продолжить
Продолжить:
Увы, такой способ плох...
!1::
Gui, 6: -SysMenu
Gui, 6: Add, GroupBox, h80 w240, Выберите функции для отпимизации:
loop, Bin\*.ahk,, 0 ; Данный выбор не имеет значения
{
MAXFUNC++
Gui, 6: Add, Checkbox, yp+15 xs+5 vFun%A_Index%, %A_LoopFileName%
}
Gui, 6: Add, Button, w242 yp+22 xp-6, Продолжить
Gui, 6: show
return
6ButtonПродолжить:
Gui, 6: Submit, nohide
count_segments = 0
loop %MAXFUNC%
count_segments:=count_segments+Fun%A_Index%
count_segments = 1
if count_segments = 0
{
soundplay *16
Gui, 3: -SysMenu
Gui, 3: Add, Text,, Вы не выбрали функции!
Gui, 3: Add, Button, xp yp+15 wp, Назад
Gui, 3: Show
return
}
Gui, 6: destroy
segment = 0
segment:=100//count_segments
Gui, -SysMenu ; Вот в этом окне не работают кнопки
Gui, Add, Progress, yp+20 x3 w200 h20 -Smooth vPR, 0
Gui, Add, Text, vtext x30 y5 w200, Запуск...
Gui, Add, Button, yp+35 x3 w100, Вернутся`nв &меню
Gui, Add, Button, xp yp+43w200, назад
Gui, Add, Button, x103 yp-43 w100, Выйти из &программы
GuiControl,Disable, Вернутся`nв &меню
GuiControl,Disable, Выйти из &программы
Gui, Show,w206
sleep 2000
loop, Bin\*.ahk
if Fun%A_Index% = 1
{
filereadline, FUNCVERB, Bin\FUNCSDATA.txt, %A_Index%
GuiControl,,text, %FUNCVERB%
RunWait, Bin\%A_LoopFileName%, 5
GuiControl,, PR, +%segment%
}
GuiControl,, PR, 100
GuiControl,,text, Оптимизация завершена!
GuiControl,Enable, Вернуться`nв &меню
GuiControl,Enable, Выйти из &программы
return
ButtonВернутьсявменю:
ButtonВыйтиизпрограммы:
ButtonТест:
Buttonназад:
msgbox, test
return