Диалоговые окна в Дельфи

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

функция/процедура Описание
ShowMessage(const Msg:string); Простое диалоговое окно с кнопкой
InputBox (const Acaption, APromt,

ADefault:string): string

Диалоговое окно с заголовком

Acaption, с предложением APromt,

окном редактирования ADefault

CreateMessageDialog

(const Msg:string; DlgType;

Buttons: TmsgDlgButtons): Tform

Окно сообщения Msg типа DlgType

с кнопками Buttons в виде объекта

формы

SelectDirectory (const Caption: string;

const Root: WideString;

out Directory: string;):

Boolean; overload;

Вызывает стандартный диалог

Windows для поиска каталога.

Задается root – корневой каталог,

Directory – выбранный каталог

InputQuery(const Acaption,

APromt:string;

var Value:string):Boolean

Диалоговое окно с заголовком

Acaption, с предложением APromt,

окном редактирования в котором

загружено Value

MessageDlg(const Msg:string;

AType:TMsgType;

AButtons: TmsgDlgButtons;

HelpCtx:Longint): Word

Окно сообщения Msg типа DlgType

с набором кнопок Buttons, и системой

справки HelpCtx

ShowMessageFmt(const Msg:string;

Params: array of const)

Отображает простое окно сообщения,

формируемого из параметров Params

строкой форматирования Msg

TAplication.MessageBox

(Text, Caption:PChar; Flags:Longint):

Integer

Создает диалоговое окно сообщения

Text с заголовком Caption. Параметр

Flags определяет пиктограмму, набор

кнопок и другие характеристики

 

Функции MessageDlg и MessageDlgPos отображают окна, в которых пользователю задается вопрос и анализируется ответ. Различия между MessageDlg и MessageDlgPos заключается в том, что MessageDlg отображает окно в центре экрана, а MessageDlgPos – в позиции X,Y от левого верхнего угла. Вид отображаемого окна задается параметром Atype:

mtWarning Окно замечаний
mtError Окно ошибок
mtInformation Информационное окно
mtConfirmation Окно подтверждения
mtCustom Окно без значка

Параметр Abuttons определяет, какие кнопки будут присутствовать:

Значение надпись на кнопке
mbYes

Yes

mbNo

No

mbOK

OK

mbCancel

Cancel

mbHelp

Help

mbAbort

Abort

mbRetry

Retry

mbIgnore

Ignore

mbAll

All

Список кнопок заключается в [], поскольку параметр Abuttons является множественным. Пример: mbYesNoCancel.

Пример окна, которое иллюстрирует диалог окончания приложения:

If MessageDlg (‘Закончить приложение?’, mtConfirmation, [mbYes, mbNo] ,0) = mrYes then

Begin

MessageDlg (‘работа приложения окончена’, mtConfirmation,[mbOk] ,0);

Close;

End;

. диалоговые окна - паскаль
. вызов диалогового окна delphi
Комментирование и размещение ссылок запрещено.