Функции и процедуры Delphi. Справочник.

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

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

Функция MessageDlg(
const Msg: string;
AType: TMsgDlgType;
AButtons: TMsgDlgButtons;
HelpCtx: LongInt ): Word;

Модуль: Dialogs

type

TMsgDlgButtons = set of TMsgDlgBtn;

TMsgDlgBtn = (mbYes, mbNo, mbOK, mbCancel, mbAbort, mbRetry, mbIgnore, mbAll, mnNoToAll, mbYesToAll, mbHelp);

TMsgDlgType = (mtWarning, mtError, mtInformation, mtConfirmation, mtCustom);

const
(дополнительные константы для параметра Buttons)

mbYesNoCancel = [mbYes, mbNo, mbCancel];
mbOKCancel = [mbOK, mbCancel];
mbAbortRetryIgnore = [mbAbort, mbRetry, mbIgnore];

Описание
Функция выводит в центр экрана диалоговое окно с заданным сообщением (message dialog box) и возвращает выбор пользователя.
Текст сообщения указывается в параметре Msg.
Параметр AType определяет вид сообщения (сообщение об ошибке, информация предупреждение и т.д.). От значения данного параметра зависит внешний вид диалогового окна.
Параметр AButtons определяет, какие стандартные кнопки должны быть отображены на диалоговом окне.
Параметр HelpCtx определяет идентификатор контекста электронной справки, которая должна появится при нажатии на клавишу [F1] в момент, когда на экране открыто диалоговое окно сообщения.
Функция возвращает значение, показывающее, какую из кнопок на диалоговом окне выбрал пользователь. Результат может иметь одно из следующих значений:

mrNone mrAbort mrYes

mrOk mrRetry mrNo

mrCancel mrIgnore mrAll

Пример
if MessageDlg('Вы действительно хотите выйти из программы?', mtConfirmation, [mbYes, mbNo], 0) = mrYes
then Close;

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