falls man doch mal den Constructor von einer Componente neu definieren will dann geht das so (in dem Beispiel soll dem Constructor noch ein String übergeben bekommen)
Delphi-Quellcode:
TTestcomp = class(TComponent)
private
fCaption: String;
public
constructor Create(AOwner: TComponent); overload; override;
constructor Create(AOwner: TComponent; ACaption: String); overload;
end;
constructor TTestcomp.Create(AOwner: TComponent);
begin
Create(AOwner, 'StandardString');
end;
constructor TTestcomp.Create(AOwner: TComponent; ACaption: String);
begin
fCaption := ACaption;
inherited Create(AOwner);
end;
Wird also der ursprungsconstructor aufgerufen (zum Beispiel weil auf TComponent gecastet wurde so wie delphi es beim automatischen creieren macht, so ruft der überschriebene Constructor den neuen Constructor mit einem Standardwert auf welcher dann die eignetliche Aufgaben erledigt.