MyTetra Share
Делитесь знаниями!
MessageDlgEx
Время создания: 17.04.2017 17:02
Раздел: Global - Programming - Pascal - Классы объектов - TatInternalObject
Запись: xintrea/mytetra_db_mcold/master/base/1492437725vamze5gyq3/text.html на raw.githubusercontent.com

Метод открывает диалог с сообщением Msg и кнопками указанными в массиве Buttons. Метод возвращает результат TModalResult, согласно нажатой кнопке. Отличием от MessageDlg является то, что в метод можно передать параметры. Допустимые параметры: “DefaultButton” – указывает, какая кнопка будет назначена кнопкой по умолчанию (на ней будет установлен фокус ввода при открытии диалога). В качестве значения параметра указывается порядковый номер кнопки, начиная с 1 (единицы)

function MessageDlgEx(
Msg: String;
DlgType : TMsgDlgType;
Buttons : TMsgDlgButtons;
HelpCtx : Integer;
ParamNames : Array;
ParamValues : Array
): Variant;

Примеры

case MessageDlgEx('да – нет - отмена ', mtWarning, [mbYes, mbNo, mbCancel], 0, ['DefaultButton'], [2]) of mrYes: ShowMessage('Да'); mrNo: ShowMessage('Нет'); mrOk: ShowMessage('Ok'); mrCancel: ShowMessage('Отмена'); mrAbort: ShowMessage('Отменить'); end;

Так же в этом разделе:
 
MyTetra Share v.0.65
Яндекс индекс цитирования