请楼主注意：
你这种使用对象方法的情况，当对象方法中访问到数据成员（或虚方法）时，会出现问题，建议不要这么用！而改用类方法，这样才会使你的代码更强壮！
类方法和对象方法还是有区别的:
1.在对象方法中，self引用的是调用它的对象
而在类方法中，self引用的是类。
2 对象方法可以使用虚方法和基类指针提供对象一级的多态
而类方法可以使用虚拟的类方法和类引用提供类一级的多态。
我认为是Delphi是没有封装好，应该说没有保护好。
实际上我们可以通过指针访问非友员的对象的私有成员，而在正常情况下，是不可以的，因为Delphi提供了这种保护功能。
