Registriert seit: 30. Mai 2004
Ort: Zermatt
411 Beiträge
Delphi 6 Enterprise
|
[OOP]: Methode (mit Parameter) überschreiben
9. Sep 2004, 08:13
- Ich hab neuerdings in der VCL etwas herumgestöbert, und hab da bei allen public-Methoden kein override gesehen, obwohl die Basisklasse die selbe Methode im public-Teil hat.
Wie soll ich das verstehen?
- Ich hab in einer Klasse ein Methode erstellt. Ich hab diese Klasse nun beerbt und wiederum die selbe Methode verwendet nur mit anderen Parametern. Ich hab schon von reintroduce gelesen, allerdings überschreibt das die geerbte Methode ohne das ich auf diese über inherited zugreifen kann, also nicht das richtige für mich. Hier der Code:
Delphi-Quellcode:
TListe = class
{...}
public
function Add_Knoten(Knoten: TKnoten): TKnoten;
end;
TNewListe = class(TListe)
{...}
public
function Add_Knoten(Knoten: TNewKnoten): TNewKnoten;
end;
function TListe.Add_Knoten(Knoten: TKnoten): TKnoten;
begin
{...}
end;
function TNewListe.Add_Knoten(Knoten: TNewKnoten): TNewKnoten;
begin
Result := TNewKnoten(inherited Add_Knoten(TKnoten(Knoten))); //Löst immer einen Fehler aus
end;
Was mache ich falsch?
Francis Obikwelu greetz
mytar
|
|
Zitat
|