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

Question

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

我想我可以递归地遍历Parent属性，直到我到达从TForm派生的东西，但是有更好的方法吗？我使用了搜索功能，但找不到任何特定于我的问题。

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

提前致谢！

Answer 1

你可以在GetParentForm单位使用Forms - 它也被VCL使用了很多。它做了你提到的 - 递归地找到其父亲中的第一个TCustomForm。此外，它还处理设计时间。