delphi中使用override需要注意的地方

       在override时，如果override的是procedure，则加上关键字inherited; 就会执行父类同名procedure的所有过程，然后再执行子类中特有的过程。如果override的是function则不会执行父类中同名function的内容。但是，可以通过下面的方法来执行父类的内容：
       例如：
    TBaseCls = Class
    public
         function Add(i1,i2:Integer):Integer;vitual;
    end;
    TChildCls = Class(TBaseCls)
    public
      function Add(i1,i2:Integer):Integer;overridd;
    end;
    
    TChildCls.Add(i1,i2:Integer):Integer;
    var
      i:integer;
    begin
      i:=inherited Add(i1,i2);
      //这儿进行你的处理。
    end;