folgendes dürfte funzen:
Delphi-Quellcode:
myClass = class(TObject)
protected
constructor Create(AOwner: TObject); override;
public
constructor Create(AOwner: TObject; Wasauchimmer: integer); overload;
end;
//...
constructor myClass.Create(AOwner: TObject);
begin
inherited;
end;
constructor myClass.Create(AOwner: TObject; Wasauchimmer: integer);
begin
Create(AOwner);
end;
obs das Create(AOwner: TObject); braucht, weiß ich nicht. Aber so gehste sicher, dass nur der neue constructor verwendet werden kann.
Habs aber nicht ausprobiert.
Vielleicht gehts aber auch ohne override ganz einfach mit dieser Zeile als aufruf für den alten constructor
Delphi-Quellcode:
begin
inherited Create(AOwner);
end;