上一页 1 ··· 4 5 6 7 8 9 10 下一页
摘要: 继承就是根据已有的类创建一个新类的过程,新类可继承父类可见的成员,并根据需要添加更多成员。 父类是最为抽象,最具有共性的一个类,子类的功能就是完善与拓展父类。 子类可以增大从父类继承过来的成员的可见性,如果父类中成员A 可见性为protected ,在子类中就可以将A 修改为public ,只需要在 阅读全文
posted @ 2020-04-18 04:08 范思哲 阅读(751) 评论(0) 推荐(0) 编辑
摘要: 概念:封装就是指利用类将数据和方法通过访问控制符封装起来,从而实现功能的隐匿。 类成员的可见性: private //不可见。 protected //派生类可见。 public //可见。 published //可见。用于运行时信息。 automated //可见。用于兼容。 //在范围以外时: 阅读全文
posted @ 2020-04-18 03:49 范思哲 阅读(432) 评论(0) 推荐(0) 编辑
摘要: 先勾画一下思路:1、建立一个类, 里面有年龄字段 FAge;2、通过 Age 属性读写 FAge;3、如果输入的年龄刚好是 100 岁, 将会激发一个事件, 这个事件我们给它命名为: OnHundred unit Unit1; interface uses Windows, Messages, Sy 阅读全文
posted @ 2020-04-18 03:40 范思哲 阅读(264) 评论(0) 推荐(0) 编辑
摘要: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure Fo 阅读全文
posted @ 2020-04-18 03:16 范思哲 阅读(202) 评论(0) 推荐(0) 编辑
摘要: 方法是在类中定义的且包装在类中的函数或过程,用于执行类的操作,完成类的任务。一个类的方法决定了通过这个类创建的实例行为, 一个类的所有方法决定了这个实例所执行的功能。类中的所有函数或过程都可以成为类的方法。 在Delphi 中子程序包含过程和函数两种表现形式,而方法通过这两种形式演变出 6种不同的形 阅读全文
posted @ 2020-04-18 01:17 范思哲 阅读(1950) 评论(0) 推荐(0) 编辑
摘要: 类中使用数组属性,声明方式如下: property 属性名[参数列表]:属性类型 Read 方法名 Write 方法名; 声明数组属性时要注意: (1)参数表与过程或函数参数表非常相似,只是用方括号,参数表中的参数类型可以是任何类型。 (2)声明数组属性时,访问说明中在Read 或Write 后面的 阅读全文
posted @ 2020-04-17 22:32 范思哲 阅读(920) 评论(0) 推荐(0) 编辑
摘要: unit Unit2; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Bu 阅读全文
posted @ 2020-04-17 21:24 范思哲 阅读(683) 评论(0) 推荐(0) 编辑
摘要: 类是一种用户自定义的数据类型,可以说它是对某一类事物的抽象描述,类使用属性和方法来描述某一事物的具体特性和行为。 类中所定义的所有数据都是类的成员,类中的定义的属性也可以称为成员变量,类中定义的方法也可以称为类的成员方法。 一般使用 T 作为定义类名的前缀,如下: //标准语法 TMyClass1 阅读全文
posted @ 2020-04-17 11:58 范思哲 阅读(1168) 评论(0) 推荐(0) 编辑
摘要: 声明过程和函数时,根据需要写入参数,参数分为两种: 形式参数:所谓形式参数是指过程和函数声明语句的参数列表中的参数,简称形参。 1 function TForm1.myfunc(s1, s2: String): String; 实际参数:实际参数则是调用函数时传入函数的参数列表,简称实参。 1 my 阅读全文
posted @ 2020-04-07 23:03 范思哲 阅读(983) 评论(0) 推荐(0) 编辑
摘要: 1 var 2 StartTime, EndTime: cardinal; 3 begin 4 StartTime := GetTickCount; 5 sleep(1000); 6 EndTime := GetTickCount; 7 caption := (IntToStr(EndTime - 阅读全文
posted @ 2020-04-07 15:25 范思哲 阅读(1219) 评论(0) 推荐(0) 编辑
上一页 1 ··· 4 5 6 7 8 9 10 下一页