| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как форме узнать кто ее вызвал [D5, Win2k]
oleiva © (2003-02-12 09:31:00)Есть Форма_1, которая вызывается из других форм - то из Формы_2, то из Формы_3 - по нажатию соответсв кнопок в этих формах. Как Форме_1 узнать, какая форма ее вызвала?
Radionov Alexey (2003-02-12 09:36:00) [1]>oleiva (12.02.03 09:31)
TForm1 = class(TForm)
procedure SpecialShow(Sender : TForm);
end;
...........
procedure TForm1.SpecialShow(Sender : TForm);
begin
Show;
// параметр Sender = вызывающая форма
end;
В параметр Sender передавать вызывающую форму
например так: Form1.SpecialShow(Self);
jack128 (2003-02-12 09:35:00) [2]ну мапример так :
procedure TForm2.Button1Click(Sender: TObject);
begin
Form1.Tag := Integer(Self);
Form1.Show;
end;
в форме_1
Caption := TForm(Tag).Caption;
Владислав (2003-02-12 09:34:00) [3]Сообщать ее об этом из вызывающих форм.
| |
