Einzelnen Beitrag anzeigen

mytar

Registriert seit: 30. Mai 2004
Ort: Zermatt
411 Beiträge
 
Delphi 6 Enterprise
 
#1

[OOP]: Methode (mit Parameter) überschreiben

  Alt 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
  Mit Zitat antworten Zitat