Вывод в окно сообщения

Вывести на экран окно с сообщением можно при помощи процедуры ShowMessage или функции MessageDlg.

Процедура ShowMessage выводит на экран окно с текстом и командной кнопкой OK.

Формат процедуры ShowMessage:

ShowMessage (Сообщение);

где Сообщение — текст, который будет выведен в окне.

Например,

ShowMessage ('Введите вес в фунтах');

Функция MessageDlg позволяет поместить в окно с сообщением один из стандартных значков, задать количество и тип командных кнопок и определить, какую из кнопок нажал пользователь. Формат функции

MessageDlg следующий:

Выбор:=MessageDlg(Сообщение, Тип, Кнопки, КонтекстСправки);

Где Сообщение — текст сообщения; Тип — тип сообщения.

Тип сообщения задается именованной константой:

Константа	Тип сообщения
MtWarning	Внимание
MtError	Ошибка
MtInformation	Информация
MtConfirmation	Подтверждение
MtCustom	Обычное

Кнопки — список кнопок, отображаемых в окне сообщения. Список может состоять из нескольких разделенных запятыми именованных констант. Весь список заключается в квадратные скобки.

Константа	Кнопка	Константа	Кнопка
mbYes	Yes	mbAbort	Abort
mbNo	No	mbRetry	Retry
mbOk	Ok	mbIgnore	Ignore
mbCancel	Cancel	mbAll	All
mbHelp	Help

Например, оператор

r:=MessageDlg('Файл'+ Fname + ' будет удален',

mtWarning, [mbOk,mbCancel], 0);

вызовет появление на экране окна: