如何在Borland VCL中获取组件的父表单?

nkl*_*ein 6 c++ delphi vcl c++builder

我想确定给定组件在我的应用程序中属于哪种形式.Parent和Owner属性都不能被假定为表单本身,所以我不能简单地使用它.

我想我可以递归地通过Parent属性,直到我得到从TForm派生的东西,但是有更好的方法吗?我使用了搜索功能,但找不到任何特定于我的问题.

顺便说一句,我正在使用Borland C++ Builder(标记为Delphi,因为大多数VCL用户似乎都是用Delphi编写的,而且我读Delphi代码就好了).

提前致谢!

Ond*_*lle 21

你可以使用GetParentFormForms单元-它是由VCL用了不少了.它做你提到的 - 递归地找到TCustomForm它的父母中的第一个.此外,它还处理设计时间.