Что нового

[Окна, Диалоги] Окно поле ввода кнопка

Wulk@n

Новичок
Сообщения
34
Репутация
0
Версия AutoIt: 3.3.12.0

Описание:
Здравствуйте Пользователи форума autoit-script.ru
Мне нужна ваша помощь Нужна написать программу (что бы было понятно сделал скрин шоты ) Окно программы поле ввода текста Кнопка
Первая вкладка вводим текст Нажимаем кнопку Activation service попадаем во вкладку два вводим нажимаем Actiovation Key Выводится Сообщение Спасибо за АКТИВАЦИЮ !
PS: для ковата это покажется ерундой а мне поможет понять работу autoit на конкретном примере!
Примечания:

73e2b3cacf61.png

44ac77ac4b0d.png
 

InnI

AutoIT Гуру
Сообщения
4,951
Репутация
1,446
Код:
Global $mail, $key
; создание GUI
$GUI = GUICreate("Activation Service", 300, 200)
$Input = GUICtrlCreateInput("Ваш mail", 60, 60, 180)
$Button = GUICtrlCreateButton("Activation Service", 80, 120, 140, 40)
GUISetState()

Do
  Switch GUIGetMsg()
    Case -3 ; закрытие окна
      Exit
    Case $Button ; нажатие кнопки
      If WinGetTitle($GUI) = "Activation Service" Then ; ориентируемся по заголовку
        $mail = GUICtrlRead($Input) ; читаем данные
        WinSetTitle($GUI, "", "Activation Key") ; меняем заголовок
        GUICtrlSetData($Input, "Key") ; меняем текст поля ввода
        GUICtrlSetData($Button, "Activation Key") ; меняем текст кнопки
      Else
        $key = GUICtrlRead($Input) ; читаем данные
        GUIDelete($GUI) ; удаляем окно
        ExitLoop ; переходим к обработке данных
      EndIf
  EndSwitch
Until 0

; обработка данных
MsgBox(0, "", "mail : " & $mail & @CRLF & "key : " & $key & @CRLF & "Спасибо за АКТИВАЦИЮ !")
 
Верх