Компоновка. Запуск программы. Ошибки времени выполнения.
Значение функции MessageDlg – число, проверив значение которого можно определить, выбором какой командной кнопки был завершен диалог. В общем виде обращение к функции MessageDlg выглядит так:
Выбор: = MessageDlg(Сообщение, Тип, Кнопки, КонтекстСправки)
Где:
- сообщение – текст сообщения;
- Тип – тип сообщения. Сообщение может быть информационным, предупреждающим или сообщением о критической ошибке. Каждому типу сообщения соответствует определенный значок. Тип сообщения задается именованной константой (табл. 2.13);
- кнопки – кнопки, отображаемые в окне сообщения. Задаются операцией включения в множество элементов – констант (табл. 2.14).
- контекстСправки – параметр, который определяет раздел справочной информации, который появится на экране, если пользователь нажмет клавишу F1. Если вывод справочной информации не предусмотрен, то значение параметра должно быть равно нулю.
Таблица 2.13. Константы, определяющие тип сообщения.
| Константа | Тип сообщения | Значок |
|---|---|---|
| mtWarning | Внимание |  |
| mtError | Ошибка |  |
| mtlnformation | Информация |  |
| mtConfirmation | Подтверждение |  |
| MtCustom | Обычное | Без значка |
Таблица 2.14. Константы, определяющие кнопки в окне сообщения.
| Константа | Кнопка | Константа | Кнопка |
|---|---|---|---|
| mbYes | Yes | mbAbort | Abort |
| mbNo | No | mbRetry | Retry |
| mbOK | OK | mblgnore | Ignore |
| mbCancel | Cancel | mbAll | All |
| mbHelp | Help |
Кроме приведенных констант можно использовать константы mbOkCancel, mbYesNoCancel и mbAbortRetryignore. Эти константы определяют наиболее часто используемые в диалоговых окнах комбинации командных кнопок.
Значение, возвращаемое функцией MessageDlg (табл. 2.15), позволяет определить, какая из командных кнопок была нажата пользователем.
Таблица 2.15. Значения функции MessageDlg.
| Значение функции MessageDlg | Диалог завершен нажатием кнопки |
|---|---|
| mr Abort | Abort |
| mrYes | Yes |
| mrOk | Ok |
| mrRetry | Retry |
| mrNo | No |
| mrCancel | Cancel |
| mrlgnore | Ignore |
| mrAll | All |