Справочник функций и процедур Delphi: InputQuery

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

InputQuery
Функция
Отображает диалог, который просит пользователя о вводе текста Dialogs unit
  function InputQuery ( const Caption, Prompt : string; var UserValue : string ) : Boolean;

Delphi Sources

Описание
Функция InputQuery отображает простое диалоговое окно с данным Заголовком (Caption) и Подсказкой (Prompt). Оно просит, чтобы пользователь ввел данные в текстовое поле на диалоговом окне. Если пользователь нажал OK, то введенные данные сохраняются в переменную UserValue, и возвращаемое значение будет True.

Если пользователь отменяет диалог, то возвращаемое значение будет False, и любые введенные данные будут потеряны.

Используйте, чтобы спросить у пользователя простые данные, например имя.
Похожие команды
InputBox  Отображает диалог, который просит пользователя о вводе текста, со значением по умолчанию

PromptForFileName  Показывает диалог, позволяющий пользователю выбрать файл

ShowMessage  Показывает простое диалоговое окно с кнопкой ОК, содержащее заданную строку

ShowMessageFmt  

ShowMessagePos  Показывает строку в простом диалоговом окне размещенном в заданном месте

 
Пример кода : Спрашиваем у пользователя его имя
var
  value : string;

begin
  // Продолжаем спрашивать у полльзователя его имя
  repeat
    if not InputQuery('Test program', 'Пожалуйста, укажите своё имя', value)
    then ShowMessage('Пользователь прервал диалог');
  until value <> '';

  // Показ его имени
  ShowMessage('Hello '+value);
end;
Диалог отобразит спрашиваемое имя пользователя.
Если пользователь напечатает 'Fred' и нажмёт OK, то отобразится:

Hello Fred
 


Последние добавленные на сайт исходники

TDictionary Custom Sort

Fast Watermark Sources

3D Designer

Sik Screen Capture

Patch Maker

Айболит (remote control)

 

ListBox Drag & Drop

Доска для игры Реверси

Графические эффекты

Рисование по маске

Перетаскивание изображений

Canvas Drawing

 

Copyright © 2004-2024 "Delphi Sources" by BrokenByte Software (источник – "DelphiBasics")

Группа ВКонтакте