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

MessageDig   Найти похожие ветки 

← →
HelloWord   (2006-08-03 20:26) [0]

Как обработать нажатие кнопки у формы генерируемой MassageDig наприме mbOK ?

---

← →
begin...end ©   (2006-08-03 20:28) [1]

if MessageDlg(...) = mrOk then ...

?

---

← →
C@N ©   (2006-08-04 18:22) [2]

case  MessageDLG("Ты МедвеД???",mtConfirmation,[mbYes,mbNo],0) of
mrYes:
     Begin
      Form1.Caption:="ПревеД!!!";
     End;
mrNo:
     Begin
      Form1.Caption:="ПакА!!!";
     End;
mrCancel:
     Begin
     showmessage("Не медведам фхот васприщ0н!!!!");
     application.terminate;
    end;
end;

если не понятно RTFM!!!

---

← →
StriderMan ©   (2006-08-04 18:26) [3]

> C@N ©   (04.08.06 18:22) [2]

а нафига столько begin-end"ов?

---

← →
DrPass ©   (2006-08-04 18:30) [4]

> а нафига столько begin-end"ов?

Уважает...

---

← →
C@N ©   (2006-08-04 18:52) [5]

to [3]   привычка {} после начала изучения С++
to [4] и пригодится если увеличивать действия на батон.... )))

---

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

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



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