Выводит на экран модальное диалоговое окно в параметризированном виде для ввода одной строки.

INPUTBOX(cInputPrompt [, cDialogCaption [, cDefaultValue [, nTimeout [,cTimeoutValue] [,cCancelValue]]]])

Параметры

cInputPrompt

Задает текст подсказки, который будет отображен над текстбоксом для ввода строки.
cDialogCaption

Задает текст, который будет отображен в заголовке диалогового окна.
cDefaultValue

Задает значение переменной по умолчанию. Это значение будет отображено в текстбоксе для ввода строки.
nTimeout

Задает значение времени в 1/1000 секунды, в течение которого диалоговое окно будет отображаться на экране (таймаут). Если задать значение nTimeout, равное 0 или совсем исключить параметр nTimeout, диалоговое окно будет отображаться на экране до окончания ввода.
cTimeoutValue

Задает значение переменной, которая будет возвращена функцией, если диалоговое окно закроется по истечению таймаута. cTimeoutValue не будет возвращена, если параметр nTimeout установлен в 0 или опущен.
cCancelValue

Задает значение символьной переменной, которая будет возвращена функцией, если диалоговое окно закрыто нажатием кнопки "Cancel" или клавиши Esc.

Замечания

Диалоговое окно выводит на экран текстбокс для ввода и кнопки "OK" и "Cancel". При нажатии на кнопку "OK" функция возвратит содержимое текстбокса. Если диалоговое окно закроется по таймауту, функция возвратит текст, заданный в cTimeoutValue или пустую строку, если значение cTimeoutValue не определено. Нажатие кнопки "Cancel" или клавиши Esc приведет к тому, что функция возвратит текст, заданный в cCancelValue или пустую строку, если значение cCancelValue не определено.

Пример 1

Code

  Скопировать код
Y = "Совсем ничего"
Y = INPUTBOX("Введите данные","Ввод данных ",Y,5000)
         && Диалоговое окно будет отображаться в течение 5 секунд. 
         && После закрытия по таймауту переменной Y будет присвоено "пустое" значение. 

Пример 2

В следующем примере диалоговое окно отображается на экране в течение 5 секунд и в главном окне Visual FoxPro выводится значение, возвращаемое функцией. Если будет нажата кнопка "OK", функция возвратит заданный по умолчанию текст "Nothing at all" или тест, введенный в текстбоксе. При нажатии кнопки "Cancel" или клавиши ESC, будет возвращен текст "Canceled". Если пользователь не предпримет никаких действий, по истечению пятисекундного таймаута будет возвращено "Timed Out".

Code

  Скопировать код
CLEAR
Y = INPUTBOX("Type Here:", "Input Title",  ;
"Nothing at all", 5000, 'Timed Out', 'Canceled')
? Y

Смотрите также