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

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

------解决方案--------------------
var
OBj:Tobject;
begin
OBj:=Child.GetParentComponent; //获取子窗口的父窗口,比如OBj:=Button1.GetParentComponent
edit1.text:=(OBj as TForm).Caption;//获取窗口名

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