Форум: "Начинающим";
Текущий архив: 2008.08.31;
Скачать: [xml.tar.bz2];

Вниз

Вопрос по MessageDlg   Найти похожие ветки 

← →
Abcdef123   (2008-07-25 05:04) [0]

Здравствуйте, Мастера!
Никогда особо не задумывалась над параметрами функции MessageDlg, проста в использовании. Но, вот сейчас возникла необходимость, чтоб на заданный вопрос предлагались ответы Yes, No, но, чтоб по умолчанию курсор был на кнопке No. Текст вопроса менять на противоположный, чтоб использовать Yes по умолчанию я не могу, так как теряется некоторый смысл в вопросе. Менять местами кнопки в синтаксисе я пробовала, все равно отображается в порядке Yes No. Я задумалась, а возможно ли это вообще?

---

← →
ASoft   (2008-07-25 06:42) [1]

не могу сказать, как в D6, а D7 есть:


uses QDialogs;
...
MessageDlg("bla, bla", mtConfirmation, [mbYes, mbNo], 0, mbNo);
...


---

← →
easy ©   (2008-07-25 08:56) [2]

MessageBox(0, "bla, bla", "Confirm", MB_YESNO or MB_DEFBUTTON2 or MB_ICONQUESTION);

---

← →
easy ©   (2008-07-25 09:29) [3]

function MessageDlgDef(const Msg: string; DlgType: TMsgDlgType;
 Buttons: TMsgDlgButtons; DfButton: string):word;
begin
 with CreateMessageDialog(Msg, DlgType, Buttons) do
 begin
   ActiveControl := FindComponent(DfButton) as TButton;
   result:= ShowModal;
 end;
end;
///..
if MessageDlgDef("bla, bla", mtConfirmation, [mbYes, mbNo],"no") = mrNo then

---

← →
Ega23 ©   (2008-07-25 09:39) [4]

MessageBox рулит.

---

Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2008.08.31;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.006 c