Функция InputQuery в Delphi отображает диалог, который просит пользователя о вводе текста.
Dialogs unit
function InputQuery (const Caption, Prompt : string; var UserValue : string) : Boolean;
Функция InputQuery отображает простое диалоговое окно с заданным Заголовком (Caption) и Подсказкой (Prompt). Оно просит, чтобы пользователь ввел данные в текстовое поле на диалоговом окне. Если пользователь нажал OK, то введенные данные сохраняются в переменную UserValue, и возвращаемое значение будет True.
Если пользователь отменяет диалог, то возвращаемое значение будет False, и любые введенные данные будут потеряны.
Используйте данную функцию, чтобы спросить у пользователя простые данные, например фамилию.
Функция InputQuery: Спрашиваем у пользователя его фамилию
var
value : string;
begin
// Продолжаем спрашивать у пользователя его фамилию
repeat
if not InputQuery('Test program', 'Пожалуйста, укажите свою фамилию', value)
then ShowMessage('Пользователь прервал диалог');
until value <> '';
// Показ его фамилии
ShowMessage('Hello '+value);
end;Результат
Диалог отобразит спрашиваемую фамилию пользователя.
Если пользователь напечатает "Ivanov" и нажмёт OK, то отобразится:
Hello Ivanov
Похожие функции, процедуры и команды
InputBox — отображает диалог, который просит пользователя о вводе текста, со значением по умолчанию.
PromptForFileName — показывает диалог, позволяющий пользователю выбрать файл.
ShowMessage — показывает простое диалоговое окно с кнопкой ОК, содержащее заданную строку.
ShowMessageFmt — отображает отформатированные данные в простом диалоговом окне с кнопкой ОК.
ShowMessagePos — показывает строку в простом диалоговом окне размещенном в заданном месте.
Угостить автора чашечкой кофе