; тут все инклюды без повторения
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
; тут создаю первую форму из Koda
$Form1 = GUICreate("Form1", 338, 171)
$Label1 = GUICtrlCreateLabel("Первая форма", 8, 8, 79, 17)
$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 8, 32, 97, 17)
$Checkbox2 = GUICtrlCreateCheckbox("Checkbox2", 8, 56, 97, 17)
$Checkbox3 = GUICtrlCreateCheckbox("Checkbox3", 8, 80, 97, 17)
$Checkbox4 = GUICtrlCreateCheckbox("Checkbox4", 8, 104, 97, 17)
$Checkbox5 = GUICtrlCreateCheckbox("Checkbox5", 128, 32, 97, 17)
$Checkbox6 = GUICtrlCreateCheckbox("Checkbox6", 128, 56, 97, 17)
$Checkbox7 = GUICtrlCreateCheckbox("Checkbox7", 128, 80, 97, 17)
$Checkbox8 = GUICtrlCreateCheckbox("Checkbox8", 128, 104, 97, 17)
$Checkbox9 = GUICtrlCreateCheckbox("Checkbox9", 232, 32, 97, 17)
$Checkbox10 = GUICtrlCreateCheckbox("Checkbox10", 232, 56, 97, 17)
$Checkbox11 = GUICtrlCreateCheckbox("Checkbox11", 232, 80, 97, 17)
$Checkbox12 = GUICtrlCreateCheckbox("Checkbox12", 232, 104, 97, 17)
$button_1_next = GUICtrlCreateButton("Дальше - вторая форма", 8, 136, 147, 25, $WS_GROUP)
$button_1_exit = GUICtrlCreateButton("Выход", 160, 136, 171, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
; тут основной цикл
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $button_1_exit
Exit
Case $button_1_next
GUISetState(@SW_HIDE, $Form1)
my_SecondForm()
GUISetState(@SW_SHOW, $Form1)
EndSwitch
WEnd
; тут вторая форма
Func my_SecondForm()
$Form2 = GUICreate("Form2", 236, 131)
$Label1 = GUICtrlCreateLabel("Вторая форма", 8, 8, 77, 17)
$Radio1 = GUICtrlCreateRadio("Radio1", 8, 32, 113, 17)
$Radio2 = GUICtrlCreateRadio("Radio2", 8, 48, 113, 17)
$Radio3 = GUICtrlCreateRadio("Radio3", 8, 64, 113, 17)
$Radio4 = GUICtrlCreateRadio("Radio4", 8, 80, 113, 17)
$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 128, 32, 97, 17)
$Checkbox2 = GUICtrlCreateCheckbox("Checkbox2", 128, 48, 97, 17)
$Checkbox3 = GUICtrlCreateCheckbox("Checkbox3", 128, 64, 97, 17)
$Checkbox4 = GUICtrlCreateCheckbox("Checkbox4", 128, 80, 97, 17)
$Button_2_back = GUICtrlCreateButton("Первая форма", 8, 104, 99, 25, $WS_GROUP)
$Button_2_exit = GUICtrlCreateButton("Выход", 112, 104, 115, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
; тут цикл второй формы - нажатия на кнопки и т.д.
While 1
$2Msg = GUIGetMsg()
Switch $2Msg
Case $GUI_EVENT_CLOSE
Exit
Case $Button_2_exit
Exit
Case $Button_2_back
GUIDelete($Form2)
ExitLoop
EndSwitch
WEnd
EndFunc ;==>my_SecondForm