Вопрос про события

← →
killer © (2003-06-06 18:07) [0]

Вот у меня форма. При нажатии на кнопку всплывает еще одна : Form2.ShowModal; На той форме 2-е кнопки :Да,Нет. Так как мне определить нажатие первой или второй? Пишу:

Form2.ShowModal;
If Form2.Button1.OnClick then
begin
.....
end;
If Form2.Button2.OnClick then
begin
.....
end;

Ничего не получается :( Что делать?

← →
Skier © (2003-06-06 18:12) [1]

А настойчивый парень !

← →
Darrin © (2003-06-06 18:15) [2]

Даже не знаю что сказать и как реагировать.

← →
killer © (2003-06-06 18:21) [3]

не поможете да? :(

← →
Юрий Федоров © (2003-06-06 18:33) [4]

Для кнопки 1 определяешь в инспекторе объектов св-во ModalResult как MrOk
для другой как MrCancel
При вызове пишешь :
if Form2.ShowModal = MrOk then
begin
//нажата кнопка ОК
end;

← →
WarLord © (2003-06-06 21:32) [5]

> If Form2.Button1.OnClick then

полный бред... событие - это не функция

← →
circul © (2003-06-06 21:49) [6]

Form2.ShowModal;
if Tag = 1 then ... if Tag = 2 then ...

в форме 2(как один из многочисленных методов):
Form2.Button1.OnClick(Sender: TObject); begin Form1.Tag := 1; end; Form2.Button2.OnClick(Sender: TObject); begin Form1.Tag := 2; end;

> какие нафиг таги

А почему бы через тэг не сделать?

Можно вообще смотреть sender :P

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