Opener formatki

Czy jest mozliwosc, moze jakas zmienna, w ktore przechowywany jest jakis odnosnik (nazwa, wskaznik) do formatki z ktorej zostala otwarta aktualnie aktywna formatka?

Parent, albo owner, a jak wywołujesz przez application, to po prostu zmienną, co to za problem?

No formatke tworze tak:

Application.CreateForm(TForm2, Form2);
Form2.okno = 'nazwa formatki z ktorej zostala otwaryta form2';
Form2.Showmodal;

I chcialbym uniknac tworzenia i przekazywanai tej zmiennej okno bo przy wiekszej ilosci zagniezdzen czy chociazby ilosci okien to jest uziazliwe i niewygodne

Dodaj pole Opener:TForm; w klasie okienka i zrób sobie procedure

Procedure OpenFrom(Form:TForm);
Begin
Application.CreateForm(TForm2,Form2);
Form2.Opener = Form;
Form2.ShowModal;
End;