Что нового

окно ввода данных

man_without_face

Новичок
Сообщения
17
Репутация
0
Версия AutoIt: 3.
3.5.4
Описание:
Необходим код:
Создание GUI окна с полем ввода, кнопками "внести запись" и "отменить"
После ввода текста в поле по нажатию Enter или первой кнопки, значение поля поместить в переменную и закрыть окно. Вторая кнопка просто закрывает окно, значение переменной - пустое.
Метод inputbox без использования GUI не подходит, т.к. режет строку после 254 символов.
Чувствую, что решение не сложное, но интернет только в телефоне, искать трудно. Спасибо
Примечания:
 

InnI

AutoIT Гуру
Сообщения
4 300
Репутация
1 155
Код:
$s = _Input("test")
MsgBox(0, StringLen($s), $s)

; ----------------------

Func _Input($Title = "")
  Local $GUI = GUICreate($Title, 260, 75)
  Local $Input = GUICtrlCreateInput("", 10, 10, 240)
  Local $BtnOK = GUICtrlCreateButton("Внести запись", 10, 40, 100, -1, 0x01) ; $BS_DEFPUSHBUTTON
  Local $BtnCancel = GUICtrlCreateButton("Отменить", 150, 40, 100)
  GUISetState()
  Do
    Switch GUIGetMsg()
      Case -3, $BtnCancel
        Return SetError(1, GUIDelete($GUI), "")
      Case $BtnOK
        Local $Text = GUICtrlRead($Input)
        Return SetError(0, GUIDelete($GUI), $Text)
    EndSwitch
  Until 0
EndFunc
 
Автор
M

man_without_face

Новичок
Сообщения
17
Репутация
0
Спасибо! То, что нужно. Дальше сам.
 
Верх