[PR] Jak pobrać Caption formy na której le?ży dany k

"Dzień dobry dla szanownych panów" :-)

Mam na formie np: Button1 i teraz chciałbym sprawdzić Caption formy na której leży ten komponent. Oczywiście u mnie w programie jest bardziej zawiła sprawa [meksykanin], nie bede tłumaczył dokładnie bo kogo by to interesowało ? :-) ale zapewniam że jest to bardzo niezbędnie koniecznie potrzebne :-)

Próbowałem tak:

Zmienna_String := Button1.Parent.Caption;

tylko że niestety Undeclared Identifier: 'Caption';

Oczywiście nie musi to być przy pomocy Parenta (że tak powiem), ważne żeby działało.
Już nie mam pomysłów :-(

Nazwa:=TButton1.(Owner as TForm).Caption; Powinno działać...

:= TForm(Button1.Parent).Caption;

Adam: no niby powinno, ale nie działa :-) ale jest luzik bo 'Owner as Form' naprowadzilo mnie w googlach do rozwiazania, wielkie dzieki. Powinno być tak o:

:= GetParentForm(Button1).Caption;

PiterEr: o Twój sposób też dobry, wielkie dzieki.

Tyle że z GetParentForm nie będzie problemu gdy button będzie leżeć np. na panelu.