Скачать: CL | DM;

Окно сообщения   Найти похожие ветки 

← →
Konnor ©   (2006-05-16 13:22) [0]

Есть вызов окна сообщения:
MessageDlg("Сообщение",mtWarning,mbYesNoCancel,0);
Как организовать разные действия на нажатия кнопок "Yes", "No" и "Cancel".

---

← →
MetalFan ©   (2006-05-16 13:25) [1]

был уже такой вопрос вчера-позавчера.
обрабатывай, что возвращает MessageDlg.
case MessageDlg(...) of
 mrYes: ...
 mrNo: ...
 mrCancel: ...
end;

---

← →
Ega23 ©   (2006-05-16 13:28) [2]


procedure DoSomethingOnYesButton;
begin

end;

procedure DoSomethingOnNoButton;
begin

end;

procedure DoSomethingOnCancelButton;
begin

end;

Case MessageDlg("Сообщение",mtWarning,mbYesNoCancel,0) of
mrYes      : DoSomethingOnYesButton;
mrNo       : DoSomethingOnNoButton;
mrCancel  : DoSomethingOnCancelButton;
end;

---

← →
Konnor ©   (2006-05-16 13:32) [3]

О... Большое спасибо!!! :)

---

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

Скачать: CL | DM;



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