Probier mal folgendes (nicht getestet):
Code:
type
TKindKlasse = class(TBasisKlasse)
private
public
procedure DoSomething(A: Integer); overload; override;
procedure DoSomething(X: String); overload; virtual; // Diese Signatur ist ja noch nicht als überschreibbar definiert
end;