TA = class private Fpa: Integer; protected property pa : Integer read Fpa; procedure fa(AA : Integer); end; TB = class(TA) public property pa; //公开保护的属性 procedure fa; //公开保护的方法,但这样做不行 end;
16,747
社区成员
33,239
社区内容
加载中
试试用AI创作助手写篇文章吧