- 1、本文档共6页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
delphi动态虚拟覆盖重载不同之处
DELPHI中方法的类型及其覆盖、重载
1、静态方法是方法的缺省类型,对它就像对通常的过程和函数那样调用,编译器知道这些方法的地址,所以调用一个静态方法时它能把运行信息静态地链接进可执行文件,所以,静态方法速度最快,但它们却不能被覆盖来支持多态性。
2、虚拟方法和静态方法的调用方式相同。由于虚拟方法能被覆盖,在代码中调用一个指定的虚拟方法时编译器并不知道它的地址,因此,编译器通过建立虚拟方法表(VMT)来查找在运行时的函数地址。所有的虚拟方法在运行时通过VMT来高度,一个对象的VMT表中除了自己定义的虚拟方法外,还有它的祚的所有的虚拟方法,因此虚拟方法比动态方法用的内存要多,但它执行得比较快。
3、动态方法跟虚拟方法基本相似,只是它们的高度系统不同。编译器为每一个动态方法指定一个独一无二的数字,用这个数字和动态方法的地址构造一个动态方法表(DMT)。不像VMT表,在DMT表中仅有它声明的动态方法,并且这个方法需要祖先的DMT表来访问它蓁的动态方法。正因为这样动态方法比虚拟方法用的内存要少,但执行起来罗慢,因为有可能要到祚对象的DMT中查找动态法。
4、OP通过覆盖使一方法在不同的派生类间表现出不同的行为。OP中能被覆盖的方法是在声明时被标识为virtual或dynamic的方法。为了覆盖一个方法,在派生类的声明中用override代替virtual或dynamic。用了override后,编译器就会用新的方法替换VMT中原先的方法,而原先的方法也还存在,而如果用override再次声明一个静态方法,则是真正的覆盖,是用新的方法完全替换在祖先类中的同明方法。
5、方法重载的意义:比如说,你要写一个求两数商的函数(当然只是个比喻),你希望这个函数可以处理所有的数值类型,但PASCAL的运算对类型
实行严格检查,你不得不用不同的程序来运算不同类型的数值,这样你就必须为每一种类型写一个同样功能的函数,并使用不同的函数名,坏处我想你是知道的。而重载却可以解决这个问题,同样的函数名,编译器可以用不同的形参类型决定调用哪个函数。Top
dynamic和virtual的不同之处
dynamic和virtual不仅作用相同,声明的语法也相同。它们唯一不同的在于内部机制。virtual的实现是通过虚拟方法表(VMT,virtualmethodtable,和C++中的vtbl很相似)实现的,在类中每一个虚拟函数在VMT中都要占用一个位置。VMT的一个不利之处在于,不论派生类中有没有重载基类中的方法,都不会改变VMT的大小,这样VMT中很多位置实际上是重复的,在一个比较大的类库中,势必要浪费不少内存。dynamic的实现方法有所不同,它不是通过VMT中指向实际方法的指针,而是通过索引来实现的,这样只有派生类中重载了的方法才会占据实际的表项,从而节省了内存。dynamic的不利之处在于,由于dynamic的方法表格(相对于VMT,dynamic的方法表格可以称为DMT)在基类和派生类中的大小不一定相同,同一个dynamicmethod的表项位置也不一定相同,所以dynamic方法必须动态查找,调用效率就低一些。相比而言,在基类和派生类中的virtualmethod在VMT中的表项位置总是固定的,所以调用很快。
总之,dynamic的优点就是virtual的缺点,dynamic的缺点也就是virtual的优点。你可以按照自己的需要来决定究竟用virtual还是用dynamic。不过,dynamic和virtual的区别可能对于编写applicationframework的程序员或者对那些效率问题至关重要的程序来讲才比较重要,对于一般的应用,虚拟方法不会很多,程序规模也不是很大的情况,一般用virtual就够了。
typeTTest=classproceudref:virtual;abstract;end;procedureTForm1.FormCreate(Sender:TObject);vart:TTest;begint:=TTest.Create;t.f;t.Free;end;ObjectPascal也支持abstractmethod,只要在函数声明中加上abstract关键字即可。当然了,只有virtual或者
typeTTest=class
proceudref:virtual;abstract;end;
procedureTForm1.FormCreate(Sender:TObject);
文档评论(0)