INPUTBOX

INPUTBOX - это функция

Выводит окно ввода, возвращает введенный текст

INPUTBOX( [], [<Text>], [<Default>] )

Примеры

INPUTBOX( 'Введите пароль:' )

if INPUTBOX( 'Введите пароль:', CHR( 1 ) + ' ', "" ) <> '47842'
  return
endif

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

Функции Delphi

Input_Box