Как определить, какой компонент открыл доч. форму?

← →
dera (2006-10-05 11:33) [0]

На главной форме есть 3 батона. При нажатии на любом из них открывается дочерняя форма (Form2). Как опредилить из Form2, какая кнопка была нажата, чтоб делать соответствующие действия в зависимости от нажатой кнопки?

← →
Плохиш © (2006-10-05 11:35) [1]

> Как опредилить из Form2, какая кнопка была нажата, чтоб
> делать соответствующие действия в зависимости от нажатой
> кнопки?

Надо сказать этой форме по какой кнопке она была создана.

← →
dera (2006-10-05 11:42) [2]

как сказать? Можна код?

← →
clickmaker © (2006-10-05 11:43) [3]

> как сказать?

Передать как параметр в какой-либо метод формы или как свойство

← →
dera (2006-10-05 12:07) [4]

как передать, если она не создана еще?

← →
clickmaker © (2006-10-05 12:12) [5]

> она не создана еще?

ты же спрашиваешь "Как опредилить из Form2". Выходит, она уже есть

← →
Плохиш © (2006-10-05 12:13) [6]

> dera (05.10.06 12:07) [4]
> как передать, если она не создана еще?

1. Передать после создания
или
2. Переписать конструктор, добавив новый параметр.

← →
ЮЮ © (2006-10-05 12:15) [7]

Form2 := TForm2.Create(nil);

Form2.MyStyle := 1; где MyStyle - public поле TForm2

Form2.Show;

---------------

Form2 := TForm2.MyCreate(nil, 1);
свой конструктор, с доп. параметром.

Form2.Show;

← →
dera (2006-10-05 12:20) [8]

а код кто-нить может показать?

а в [7] разве не код? Того, что в [6] словами сказано

← →
ASoft (2006-10-06 05:19) [10]

главная_форма.батон.tag

TForm2 = class(TForm)
.....
public
FButton: TButton;
end;

.....

procedure TForm1.Button1Click(Sender: TObject);
begin
TForm2.Create(Self).FButton := Sender;
end;

Как определить, какой компонент открыл доч. форму? Найти похожие ветки