Функция InputQuery( const ACaption, APrompt: string; var Value: string ): Boolean;
Модуль: Dialogs
Описание
Функция выводит на экран диалоговое окно для ввода строки пользователем.
Параметр ACaption определяет заголовок диалогового окна.
APrompt - текст, который будет отображен над полем редактирования (подсказка пользователю о том, что конкретно необходимо ввести в поле редактирования).
Параметр Value определяет строку, которая появится в поле для ввода текста при вызове диалогового окна.
Когда пользователь нажимает кнопку [OK] функция проверяет, был ли изменен текст в поле редактирования. Если пользователем был введен новый текст, то функция записывает строку текста из поля редактирования в переменную Value.
В качестве результата функция возвращает True, если пользователь нажимает кнопку [OK], и False, когда пользователь нажимает кнопку [Cancel] или клавишу [Esc].
Пример var
Year: string;
begin
Year:='1812'; if InputQuery( 'Ввод даты', 'Введите год Вашего рождения', Year)
then MessageDlg( 'Вы родились в '+Year+' году', mtInformation, [mbOk], 0) else MessageDlg('Вы не знаете дату своего рождения?', mtInformation, [mbOk], 0);
