[proxy]

Вставте в ваш код скрипта регион:

Код:

#region: - _MsgBox
  ...
#endregion

Вызов функции в примерах..)

Enjoy

[Creat0R]

я по английски не понимаю »

В кодинге без этого почти невозможно .

он ошибку выкидывает на 5 строке »

Нужно в начало добавить это:

Код:

#include <WindowsConstants.au3>
#include <EditConstants.au3>
#include <ButtonConstants.au3>

[beve]

Можешь конкретно написать код чтобы был точный прототип стандартного INPUTBOX'a ??? »

Может тебе нужно просто вот это?:

Код:

#include <GUIConstants.au3>

$hForm = GUICreate("Test", 221, 170)
$sInput=GUICtrlCreateInput("", 8, 100, 201, 21)
GUICtrlCreateLabel("Введите какой-то текст:", 8, 16, 127, 17)
$Ok_Button = GUICtrlCreateButton("Ок", 8, 135, 81, 25, 0)
$Cancel_Button = GUICtrlCreateButton("Отмена", 128, 135, 81, 25, 0)
GUISetState(@SW_SHOW)


While 1
$nMsg = GUIGetMsg()
Switch $nMsg
    Case $GUI_EVENT_CLOSE
        GUIDelete($hForm) ;удаляем gui, так как уже не надобно
        Exitloop ;выход только из текущего цикла While 1 ---- Wend а не закрытие всего нашего скрипта
    Case $Cancel_Button
        GUIDelete($hForm) ;удаляем gui, так как уже не надобно
        MsgBox(0,"Внимание","Была нажата кнопка отмена поэтому будет выход из цикла")
        ExitLoop
    Case $Ok_Button
        $sText = GUICtrlRead($sInput)
        if $sText=="" then
        MsgBox(0,'Внимание','Вы не ввели никакого текста')
        else
        GUIDelete($hForm) ;удаляем gui, так как уже не надобно
        MsgBox(0,"",$sText) ;можно обойтись без этого сообщения, оно нужно лишь чтобы показать что в переменной $sText уже хранится текст введенный ранее в инпут
        Exitloop
        endif
EndSwitch
WEnd
;дальше может быть любой набор команд...

Сомневаюсь, ибо это просто начало, на autoite, но всетаки...

[sashadeg]

Спасибо всем ответившим!!! beve, твоё сообщение - ТО ЧТО доХтор ПРОПИСАЛ

У меня ещё вопросик, а можно ещё несколько полосочек для ввода текста вставить в ОДНО окно? Допустим на примере кода beve?

[beve]

можно ещё несколько полосочек для ввода текста вставить в ОДНО окно? »

Код:

#include <GUIConstantsEx.au3>

$GUI = GUICreate("AutoIt Example", 300, 160)
GUICtrlCreateLabel("Введите нужный текст во все поля:", 20, 10, 260, 20)
$Input_1 = GUICtrlCreateInput("", 20, 40, 260, 20)
$Input_2 = GUICtrlCreateInput("", 20, 70, 260, 20)
$Input_3 = GUICtrlCreateInput("", 20, 100, 260, 20)

$Ok_Button = GUICtrlCreateButton("OK", 40, 130, 60, 20)
$Cancel_Button = GUICtrlCreateButton("Отмена", 200, 130, 60, 20)
GUISetState(@SW_SHOW, $GUI)

While 1
Switch GUIGetMsg()
    Case $GUI_EVENT_CLOSE
        Exit ;тут выход вобще из скрыпта при закрытии Gui окна
    Case $Cancel_Button
        GUIDelete($GUI) ;удаляем gui, так как уже не надобно
        MsgBox(0,"Внимание","Была нажата кнопка Отмена поэтому будет выход из цикла")
        ExitLoop
    Case $Ok_Button
        $sText1 = GUICtrlRead($Input_1)
        $sText2 = GUICtrlRead($Input_2)
        $sText3 = GUICtrlRead($Input_3)
        if $sText1=="" Or  $sText2=="" Or $sText3=="" then
        MsgBox(0,'Внимание','Вы не ввели текст во всех полях')
        else
        GUIDelete($GUI) ;удаляем gui, так как уже не надобно
        MsgBox(0,"Результат",$sText1 & @CRLF &$sText2 & @CRLF & $sText3) ;можно обойтись без этого сообщения, оно нужно лишь чтобы показать что в переменных $sText1, $sText2, $sText3 уже хранится текст введенный ранее в инпуты
        Exitloop
        endif
EndSwitch
WEnd
;дальше может быть любой набор команд...

P.S. Вот по этой ссылке http://www.autoitscript.com/fileman/...ormdesign.html можеш загрузить программу KODA FormDesigner, написанную на автоите, и с её помощью нарисовать такое Gui-окно с инпутами кнопками, как тебе подходит, а названия переменных, можеш сделать хоть и как в примере выше...В программе есть Русский язык, на который можно переключится в настройках программы.

[sashadeg]

beve, ты просто... ты... ты просто ЗОЛОТО!!!!

Я удивляюсь, как у тебя благодарностей меньше чем сообщений спасибо, всё просто и понтно