Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.10.07;
Скачать: CL | DM;

Вниз

Помогите ламеру   Найти похожие ветки 

 
Alf_ ©   (2002-09-26 07:37) [0]

procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.ShowModal();
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
Form2.ShowModal();
end;

procedure TForm2.FormShow(Sender: TObject);
begin
// как мне узнать какая кнопка была нажата на первой форме?
end;


 
MBo ©   (2002-09-26 07:44) [1]

procedure TForm1.Button1Click(Sender: TObject);
begin
ButtonPressed:=1; //(или Button1)
Form2.ShowModal();
end

а в form2 смотри эту переменную


 
Anatoly Podgoretsky ©   (2002-09-26 07:54) [2]

Только эту переменнцю лучше организовать в Form2


 
Alf_ ©   (2002-09-26 07:55) [3]

А без обьявления переменной можно ?
Там случайно в форму не передаеться каким она обьектом была вызвана?


 
alf_ ©   (2002-09-26 07:56) [4]

А почему лучше в Form2 ?



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

Текущий архив: 2002.10.07;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
4-21325
maxim2
2002-08-21 08:14
2002.10.07
Cut, Copy, Paste,


7-21294
sergn
2002-07-27 11:54
2002.10.07
Как перехватить событие открытия лотка CD-привода?


1-20948
Shc
2002-09-25 10:00
2002.10.07
Компонента для работы с текстом и рисунками. Вставка объектов.


1-21061
Андрусь
2002-09-27 12:22
2002.10.07
Чем отличаются проекты


1-21006
Gerr
2002-09-26 19:08
2002.10.07
Справочник по API функциям