Delphi编程入门讲解幻灯片.ppt

面向对象程序设计（OOP） 类的概念： 指某一类事物共同特征的抽象描述。类使用属性和方法来描述某一事物的具体特征和行为。 对象的概念： 即类的实例化。 面向对象编程的表现形式： 封装 继承 多态 封装—代码模块化 指利用类将数据和方法封装起来，从而实现功能的隐匿，即控制功能的可见性。 1、访问控制符 私有成员访问符(private) 受保护成员访问符(protected) 公有成员访问符(public) 发布的成员访问符(published) 自动的成员访问符(automated)//不再使用，向后兼容保留 2、封装方式 a、逻辑封装 对类进行操作，将业务的功能和行为以类的形式呈现。 b、物理封装 表现形式：如动态链接库(DLL)。 继承—代码重用 继承就是根据已有的类创建一个新类的过程。继承的类称为子类，被继承的类称基类。子类的功能就是完善与扩展基类。 子类可以继承基类的变量、属性和方法。 1、属性的继承 属性通过继承不但可以增加可见性，还可以对其功能进行扩展。 2、方法的继承 方法 静态方法：默认类型 虚方法(virtual) 动态方法(dynamic) 抽象方法(abstract)：基类无需实现，子类必须实现。 当代码被编译时，编译器会给静态方法一个地址；子类继承时，只是将基类方法的地址赋给了子类。 代码运行时通过动态查找VMT/DMT来指定地址。 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) edt1: TEdit; btn1: TButton; procedure btn1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; type TMyBaseClass = class public procedure BaseSetEdt; end; type TMyChildClass = class(TMyBaseClass) public procedure ChildSetEdt; end; var Form1: TForm1; implementation {$R *.dfm} { TMyBaseClass } procedure TMyBaseClass.BaseSetEdt; begin Form1.edt1.Text := Form1.edt1.Text + 基类; end; { TMyChildClass } procedure TMyChildClass.ChildSetEdt; begin Form1.edt1.Text := Form1.edt1.Text + 子类; end; { TForm1} procedure TForm1.btn1Click(Sender: TObject); var MyChildClass: TMyChildClass; begin MyChildClass := TMyChildClass.Create; MyChildClass.BaseSetEdt; MyChildClass.ChildSetEdt; end; end. 多态—接口重用 多态性是允许你将父对象设置成为和一个或更多的他的子对象相等的技术，赋值之后，父对象就可以根据当前赋值给它的子对象的特性以不同的方式运作（摘自“Delphi4 编程技术内幕”）。简单的说，就是一句话：允许将子类类型的指针赋值给父类类型的指针。 覆盖(override)和虚方法是多态的主要表现形式。注意：重载(overload)只是一种语言特性，与多态无关，与面向对象无关！ 重载(overload)： 1、方法名一定相同。 2、参数个数、参数类型及参数顺序不同。 3、在Delphi中，返回值不同，不能区分两个重载的方法。 例： function ShowMsg(psStr: String;piInt: integer): String;overload; function ShowMsg(piInt: integer;