为什么我在delphi中定义了一个类，使用时却是可以直接访问其私有成员？

Question

比如：
     dj_class=class
  private
    i1:integer;
    j1:integer;
  protected
    ipro:integer;
    jpro:integer;  public
    ipublic:integer;
    procedure hehe();  end;   引用的时候：hehe:dj_class;
               hehe.i1:=5;\\左边这句居然可以运行！！！编译也通过，运行也可以！请问怎么回事？？

Answer 1

这是DELPHI的一个弊病或者也可以说是“优点”，即只要在同一个单元内，类的私有成员就没有屏障，可以被本单元的任何代码访问，而出了此单元，才符合类的私有保护规则。