Сообщения Дельфи

Осуществить сообщения можно с помощью нескольких процедур: с помощью процедуры ShowMessage, функции MessageDlg, создания дополнительного окна. Процедура showmessage дает возможность вывести пользователю простое сообщение. При этом образуется дополнительное окно с названием проекта и кнопкой ОК. Выглядит все это так: Синтаксис: ShowMessage(Msg: string); Пример:

ShowMessage(‘Все задачи выполнены успешно’);
Функция messageDlg дает возможность создавать сложные диалоговые запросы с применением обратной связи. Имеет форму дополнительного окна, дополненного изображением. Кроме того, можно применять диалоговые запросы. Название окна определяется типом
запроса.

Синтаксис:

MessageDlg(Msg: string; AType: TMsgDlgType; AButtons: TMsgDlgButtons; HelpCtx: Longint): Word;
Msg — строковой параметр. Определяет выводимое сообщение;
Atype — внутренний параметр функции. Определяет тип сообщения:
1) mtWarning — сообщение о предупреждении;
2) mtError — сообщение об ошибке;
3) mtInformation — информационное сообщение;
4) mtConfirmation — сообщение о подтверждении;
5) mtCustom — сообщение не содержит в углу изображения. Название окна соответствует названию исполняемого файла (аналогично showmessage);
Abuttons — определяет имена кнопок, отображающиеся в диалоговом запросе. Возможны значения:
mbYes, mbNo, mbOK, mbCancel, mbHelp, mbAbort,
mbRetry, mbIgnore, mbAll;
HelpCtx — включает номер раздела, используемый пользователем, если он вызовет справку, когда диалог активизирован.

Например:

MessageDlg(‘Продолжить выполнение программы’, mtConfirmation, [mbYes, mbNo], 0);

Для определения того, какой вариант ответа выбрал пользователь, можно применить простую проверку. В этом случае исходный код будет иметь следующий вид:

If MessageDlg(‘Закончить выполнение задачи?’,
mtConfirmation, [mbYes, mbNo], 0) = mrYes
Then
Begin
MessageDlg(‘Выполнение задачи закончено.’, mtInformation, [mbOk], 0);
Close;
end;

Создание сообщения с применением дополнительного окна достаточно трудно. Данный способ применяется для создания сложных запросов, когда одного только «Да» и «Нет» недостаточно. Например, когда от пользователя необходимо получить код продолжения, в зависимости от которого приложение выполнит те или иные операции.