Moin kiar,
nein, dadurch, dass TBasisCompo von TCustomControl abgeleitet wird, und diese die Methode Paint enthält (mindestens als proteced deklariert), enthält TBasisCompo die Methode auch. Durch das überschreiben hat man nur die Möglichkeit die Arbeitsweise einer geerbten Methode (virtual/dynamic) zu verändern, man muss es nur nicht.
Da in diesem speziellen Falle die Methode unter protected deklariert ist, kann auf diese allerdings nicht in einer anderen
Unit darauf zugreifen, wenn man eine Instanz von TBasisCompo bildet.
Schau Dir dazu auch mal den Abschnitt über private, protected und public in der Hilfe an.
Beispiel:
In der Unit1 wird TBasisCompo deklariert, in Unit2 TNachfahr (hier wird Paint veröffentlicht), und in Unit3 wird eine Instanz von TNachfahr gebildet
Delphi-Quellcode:
// Unit1
type
TBasisCompo = class(TCustomControl)
end;
// Unit2
uses ..., unit1;
type
TNachfahr = class(TBasisCompo)
public
procedure Paint; override;
end;
implementation
procedure TNachfahr.Paint;
begin
//...
end;
// Unit3
implementation
uses unit2;
procedure TForm3.Button1Click(Sender: TObject);
var
nf : TNachfahr;
begin
nf := TNachfahr.Create(self);
nf.Paint;
end;