- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
第3章节面向对象编程技术
本章要点3.1 类和对象3.2 类的字段、属性和方法3.3 类的继承、封装和多态3.4 Object Pascal中的异常处理结构 结束;本章要点;3.1 类和对象;type
MyClass = Class
private
FNum : Integer;
Procedure SetNum(Value: Integer);
Property pNum: Integer read FNum write SetNum;
end;
Procedure MyClass .SetNum(Value: Integer);
begin
FNum := Value;
end;
;Type
TEmployee = class
Name:string;
Age: Integer;
Department: string;
Procedure GetID(vname:string; vage:integer; vdep: string);
End;
Var
Limin : TEmployee;
Implementation
Procedure TEmployee.GetID(vname:string; vage:integer; vdep:string);
Begin
Name := vname;
Age := vage;
Department := vdep;
End;;类可继承,即从一个类派生出子类
例如:飞机— 直升飞机,动物—人
派生类的定义
Type
类类型标识符 = class (基类)
类成员列表
end;;对象的概念
对象是类的实例,即类类型的变量
Var
Form1: TForm1;
Var Limin : TEmployee;
;创建对象
Var Limin : TEmployee;
按上述方法声明的对象只是一个空的指针,系统并没有为该对象动态分配内存空间。要想让它成为一个实实在在的对象,还必须调用类的构建函数Create。例如我们可以采用以下方法创建Limin对象:
Limin := TEmployee.create;
这里:Create是所有类的默认构造函数,
;析构对象
在使用完对象后,应及时析构对象,以释放其占用的内存空间。析构对象可用析构函数 Free或 Destroy。推荐使用Free,因为使用Free更安全。与构造函数不同的是,析构函数须由对象引用来调用,即它应用于对象而不是类。例如:
Limin.Free;
Free和Create一样也是从TObject类继承过来的。;3.2 类的字段、属性和方法;属性
属性和字段主要差别:属性封装了读写操作,一般不能直接访问,但可在程序内部对它进行操作。属性声明时必须用保留字property,且要说明其读写操,声明的一般格式为:
property属性名:数据类型 read 变量或方法 write 变量或方法 default 默认值;;type
MyClass = Class
private
FNum : Integer;
Procedure SetNum(Value: Integer);
Property pNum: Integer read FNum write SetNum;
end;
Procedure MyClass .SetNum(Value: Integer);
begin
FNum := Value;
end;
;方法:对象内执行特定操作的过程和函数
方法的声明和定义;方法的分类
静态方法: static
虚拟方法: virtual
动态方法: dynamic
消息方法: message
Type
TFigure = class
Procedure draw; //静态方法
Procedure Beep; virtual; //虚拟方法
Procedure Rectangle; dynamic; //动态方法
Procedure SentMessage(var M :TMessage); message WM_LBUTTON; //消息方法
End;;静态方法
所有方法在默认情况下都为静态方法。静态方法是不能重载的,即当一个类派生一个子类时,子类将在同一地址共享父类中的静态方法。
您可能关注的文档
- 第1课电气时代到来.ppt
- 第1部分第14章节中国地理差异.ppt
- 第1课时物质分离与提纯.ppt
- 第1课“古诗词3首”.ppt
- 第21章节衣原体.ppt
- 第2.1章节建筑光学基本知识.ppt
- 第22章节用Spring整合其他应用.ppt
- 第21章节在演示文稿中插入对象.pptx
- 古典和新可口可乐案例分析.ppt
- 第22章节C语言程序课程设计-游戏.ppt
- 实训楼网络综合布线设计方案.doc
- 网络环境下的企业营销传播模式.pptx
- 学生选课管理系统数据库课程设计.doc
- 英美文学霍桑介绍.ppt
- 2025年黑龙江省牡丹江管理局北斗星协会初三下学期化学试题周末卷含解析.doc
- 2024-2025学年福建省泉州市重点名校初三3月第二次周考语文试题含解析.doc
- 广东省揭阳市华侨高级中学2025年语文高一下期末质量跟踪监视模拟试题含解析.doc
- 云南省麻栗坡民族中学2024年高三第二次调研历史试卷含解析.doc
- 河南省虞城县高级中学2025届高三高考全真模拟卷(三)英语试题含解析.doc
- 福建省龙岩市第五中学2025年初三4月质量调研(二模)语文试题理试题含解析.doc
原创力文档


文档评论(0)