Функция Message

Назначение

Функция предназначена для выдачи запроса или сообщения.

Описание

Message (aMessage : string, mode : word ) : word;

Параметры

aMessage : string - текст сообщения. Для перехода на новую строку можно использовать Chr(13) или #13, например Message('Ошибка:'+Chr(13)+'Файл не найден', Error).

mode : word - описание кнопок и заголовка. Для вычисления mode можно использовать:

• константы видов кнопок, которые появятся в диалоговом окне: yesButton, noButton, cancelButton, okButton, HelpButton (добавляет кнопку Help), yesNo (yesButton + noButton), okCancel (okButton + cancelButton), mfYesNoCancel (yesButton + noButton + cancelButton);

• константы вариантов заголовков: Error (ошибка), Warning (предупреждение), Information (информация), Confirmation (подтверждение);

• константы модификации режима: mfSwapButtons (переключает кнопку по умолчанию), mfNotLogMessage (отключает запись сообщения в протокол), mfIgnoreBatch (отключает пакетный режим, жестко ждет ответа именно от пользователя).

Mode вычисляется как сумма необходимого заголовка, кнопок и модификаторов. Параметр может отсутствовать. По умолчанию берется Information + okButton.

Возвращаемое значение

Команда, соответствующая нажатой кнопке, может быть cmOk, cmCancel, cmYes, cmNo.

Пример

if Message('Продолжить?', yesNo+Confirmation) = cmYes then
  {Продолжить};
Message('Расчет завершен');