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

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

← →
Pashkerton   (2004-10-27 14:11) [0]

Добрый день.
Вопрос: Как обрабтать нажатия внопок в цикле?
На форме есть несколько кнопок, по нажатию на одну из них
Flag принимает одно из значений ModalResult.

Flag : TModalResult;

Flag:= mrNone;

while (Flag <> mrAbort) do begin
.
.
 case Flag of
   mrYes: BlaBlaBla;//При нажатии на кнопку 1
   mrNo : BlaBlaBla;//При нажатии на кнопку 2
   .
   .
 end;
.
.
end;
Согласитесь что такая конструкция нелепа.
Как правильно пускать цикл по одной из веток в зависимости от нажато Button?

---

← →
Pentium133 ©   (2004-10-27 14:15) [1]

в OnClose формы анализируй ModalResult

---

← →
Rem ©   (2004-10-27 14:15) [2]

>> Согласитесь что такая конструкция нелепа.
Вопрос задан не лучше...

Sender не помогает?

---

← →
Pashkerton   (2004-10-27 14:24) [3]

>> Вопрос задан не лучше...
сосогласен.
Sender не помогает.

---

← →
Sphinx   (2004-10-27 14:29) [4]

> Pashkerton   (27.10.04 14:24) [3]

> в OnClose формы анализируй ModalResult

Самое надежное решение. И самое простое, ни каких циклов. А если надо чтобы форма при нажатии на какую-то кнопку не закрывалась делай Action:=caNone

---

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

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



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