怎么获得父窗口的句柄，name等

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

[解决办法]
var
OBj:Tobject;
begin
OBj:=Child.GetParentComponent; //获取子窗口的父窗口，比如OBj:=Button1.GetParentComponent
edit1.text:=(OBj as TForm).Caption;//获取窗口名

//(OBj as TForm).Caption := '换名了';//更改窗口名
end;