如何获得父窗口的句柄，name等？

Question

A窗口中，x := BForm.create(application)
BForm是A窗口的子窗口，Ａ窗口是BForm窗口的父窗口，是这样吧？
那么如何获得父窗口的句柄，name等？　
因为我要判断父窗口的名字，根据不同的名字，做不同的事情

Answer 1

var
OBj:Tobject;
begin
    OBj:=Child.GetParentComponent;  //获取子窗口的父窗口，比如OBj:=Button1.GetParentComponent
     edit1.text:=(OBj as TForm).Caption;//获取窗口名
     
    //(OBj as TForm).Caption := '换名了';//更改窗口名
end;