ХI. ФУНКЦИИ И ПРОЦЕДУРЫ ДЛЯ РАБОТЫ С КЛАССАМИ И КОМПОНЕНТАМИ

5. Функции и процедуры для работы с диалоговыми окнами и сообщениями

Функция 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);

end;

[Вернуться к содержанию]