此文是参考  原文链接 和群友及作者自己曾经用过的方法简单总结，感谢群内的朋友和原文作者。另外，此文中所谓的访问另一个类的私有成员，另一个类并不在同一单元，在同一单元内的私有成员 Delphi 也是可以直接访问的，不需要绕圈子。 1、最易用的方法：class helper + with self 创建一个对应类的 cl