有关于面向对象的一个问题。请大家看看

Question

请看下面的语句;
 请问是classa.fun1执行了还是classb.fun1执行了
classa
procedure fun1:virtual;procedure fun1
begin
...
end;
classb=class(classa)
procedure fun1:override;procedure fun1
begin
...
end;aa:classa;
aa:=classb.create;
aa.fun1;请问此时aa执行的是哪个fun1啊?

Answer 1

var
 a: classa;
begin
 a := classa.Create; //如果这样创建就执行的是Classa的funl的方法.
 a.funl;  
 /////////////////
 a := classb.Create; //如果这样创建就执行的是Classb的funl的方法.
 a.funl;
end;
这就是多态的一种实现啦..

Answer 2

这是最基本的OOP思想哦!
用在哪个语言里都一样.