理解 Delphi 的类(八) - 关于类的定义

 

  //标准语法
  TMyClass1 = class(TObject)

  end;

  //如果是继承自 TObject 可以省略
  TMyClass2 = class

  end;

  //可以实现多个接口; 实现接口时经常用到 TInterfacedObject 类, 它实现了接口的默认方法
  TMyClass3 = class(TInterfacedObject, Interface1, Interface2)

  end;

  //现在 TMyClass4 相当于 TObject 的别名
  TMyClass4 = class(TObject);

  //用 class abstract 说明抽象类, 但内部必须有抽象方法, 才是真正的抽象类.
  TMyClass5 = class abstract(TObject)
    procedure Proc; virtual; abstract;
  end;

  //用 class sealed 定义不可继承的类
  TMyClass6 = class sealed(TObject)
   //...
  end;

  //这是定义了一个 TObject 类型的指针; TMyClass 称作 TObject 的类引用或元类
  TMyClass = class of TObject;

//类中数据成员的排列顺序一般是: 字段、方法、属性

//访问权限区域的顺序一般是:

  无限制区(默认 published)

  private

  protected

  public

  published
posted @   h2z  阅读(336)  评论(0编辑  收藏  举报
编辑推荐:
· 智能桌面机器人:用.NET IoT库控制舵机并多方法播放表情
· Linux glibc自带哈希表的用例及性能测试
· 深入理解 Mybatis 分库分表执行原理
· 如何打造一个高并发系统?
· .NET Core GC压缩(compact_phase)底层原理浅谈
阅读排行:
· 手把手教你在本地部署DeepSeek R1,搭建web-ui ,建议收藏!
· 新年开篇:在本地部署DeepSeek大模型实现联网增强的AI应用
· Janus Pro:DeepSeek 开源革新,多模态 AI 的未来
· 互联网不景气了那就玩玩嵌入式吧,用纯.NET开发并制作一个智能桌面机器人(三):用.NET IoT库
· 【非技术】说说2024年我都干了些啥
历史上的今天:
2016-01-06 python4delphi Python could not be properly initialized. We must quit.
2016-01-06 搭建自己的ngrok服务
2016-01-06 Windows/Centos安装GO语言环境
2016-01-06 自编译ngrok服务器
点击右上角即可分享
微信分享提示