Вниз
Скачать: CL | DM;

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

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


← →
Yanis ©   (2003-06-06 21:58) [7]

To killer ©
А зачем тебе это определять, неужели стандартные обработчики типа
Button1.OnClick уже не помогают?


← →
Pat ©   (2003-06-06 22:03) [8]

ShowModal эта функция и отсюда надо плясать...какие нафиг таги?!?!? :eek:
Юрий Федоров © (06.06.03 18:33) все сказал


← →
Vulko ©   (2003-06-06 22:59) [9]


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

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

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



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

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



Память: 0.46 MB
Время: 0.02 c
3-60061
ss300
2003-05-28 13:48
2003.06.19
Вычисление суммы по группам


6-60301
PVOID
2003-04-16 14:27
2003.06.19
Помогите пожалуйста разобраться с RAS


6-60297
kopcap
2003-04-10 07:20
2003.06.19
Пожалуйста обьясните в чем разница в сокетах


1-60167
TDIONIS
2003-06-07 00:35
2003.06.19
CopyFiles


14-60336
Дмитрий К.К.
2003-06-02 05:56
2003.06.19
Именинники 2 июня




   Наверх