Обработка события

← →
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

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