张志峰的博客

摘要： 通过覆盖一个方法可以实现OOP的多态性的概念。通过覆盖方法可以在不同的实现类中有不同的行为。Delphi中能够被覆盖的方法限定为Virtual和Dynamic的方法。为了覆盖一个方法，在派生类中用Override代替上面的标识符。注意：在声明方法的时候，如果派生类中的方法名没有带Override，但是名称和父类的相同。这个时候派生类中方法和父类中的这个方法都同时存在，没有覆盖父类的方法。例子如下：Type T1 = class procedure AB; Virtual;end;T2 = class(T1) procedure AB;end;Var Some1: T1; Some2: T2;b 阅读全文