正在阅读：浅谈多态—概念描述浅谈多态—概念描述

2004-02-14 09:34 出处：PConline 作者：Nicrosoft 责任编辑：zwg

什么是接口重用？我们举一个简单的例子，假设我们有一个描述飞机的基类（Object Pascal语言描述，下同）： type plane = class public procedure fly(); virtual; abstract; //起飞纯虚函数 procedure land(); virtual; abstract; //着陆纯虚函数 function modal() : string; virtual; abstract; //查寻型号纯虚函数 end; 然后，我们从plane派生出两个子类，直升机（copter）和喷气式飞机（jet）： copter = class(plane) private fModal : String; public constructor Create(); destructor Destroy(); override; procedure fly(); override; procedure land(); override; function modal() : string; override; end; jet = class(plane) private fModal : String; public constructor Create(); destructor Destroy(); override; procedure fly(); override; procedure land(); override; function modal() : string; override; end; 现在，我们要完成一个飞机控制系统，有一个全局的函数 plane_fly，它负责让传递给它的飞机起飞，那么，只需要这样： procedure plane_fly(const pplane : plane); begin pplane.fly(); end; 就可以让所有传给它的飞机（plane的子类对象）正常起飞！不管是直升机还是喷气机，甚至是现在还不存在的，以后会增加的飞碟。因为，每个子类都已经定义了自己的起飞方式。可以看到 plane_fly函数接受参数的是 plane类对象引用，而实际传递给它的都是 plane的子类对象，现在回想一下开头所描述的“多态”：多态性是允许你将父对象设置成为和一个或更多的他的子对象相等的技术，赋值之后，父对象就可以根据当前赋值给它的子对象的特性以不同的方式运作。很显然，parent = child; 就是多态的实质！因为直升机“是一种”飞机，喷气机也“是一种”飞机，因此，所有对飞机的操作，都可以对它们操作，此时，飞机类就作为一种接口。多态的本质就是将子类类型的指针赋值给父类类型的指针（在OP中是引用），只要这样的赋值发生了，多态也就产生了，因为实行了“向上映射”。应用多态的例子非常普遍，在Delphi的VCL类库中，最典型的就是：TObject类有一个虚拟的Destroy虚构函数和一个非虚拟的Free函数。Free函数中是调用Destroy的。因此，当我们对任何对象（都是TObject的子类对象）调用 .Free();之后，都会执行 TObject.Free();，它会调用我们所使用的对象的析构函数 Destroy();。这就保证了任何类型的对象都可以正确地被析构。多态性作为面向对象最重要的特性，本文所提不过是沧海一粟，还有很多内容。如果可能，希望会有后文继续探讨多态。