Question

Delphi中inherited的详细用法。。

Answer 1

inherited就是调用祖先类的函数，如果不带参数就是默认调用同名函数
如果带参数则表明子类中的函数个数可能比祖先类要多取其中的几个参数传过去
例如
祖先类有个函数 Create(AName:string);
子类有个函数 Create(AName:string;AComponent:TObject);override;
那么子类的Create函数内就可以这样调用祖先类：
procedure TAClass.Create(AName:string;AComponent:TObject);
begin
Inherited Create(AName);
end;

Answer 2

inherited就是调用祖先类的函数，如果不带参数就是默认调用同名函数
如果带参数则表明子类中的函数个数可能比祖先类要多取其中的几个参数传过去
例如
祖先类有个函数 Create(AName:string);
子类有个函数 Create(AName:string;AComponent:TObject);override;
那么子类的Create函数内就可以这样调用祖先类：
procedure TAClass.Create(AName:string;AComponent:TObject);
begin
Inherited Create(AName);
end;