nooochmaaal zum Mitschreiben...
override klappt nur mit Methoden, die als virtual oder dynamic deklariert sind.
Eine abstrakte Methode ist virtuell, aber sie enthält keine Implementierung. (Ich habe absolut KEINE Ahnung, warum man das virtual davor schreiben muss
)
Wenn du für verschiedene Ableitungen unetrschiedliches Verhalten haben willst, dass du auf einen gleichen Satz von Methoden/PRoperties zusammenfassen kannst *musst* du virtuelle Methoden nehmen.
Delphi-Quellcode:
Base = class
procedure Paint; virtual; abstract;
procedure DoSomething;
end;
du hattest:
Delphi-Quellcode:
Descendant = class(Base)
procedure Paint;
end;
Was ist falsch?
Du hast eine neue Methode Namens Paint eingeführt, anstatt Base.Paint zu implementieren.
Delphi-Quellcode:
var
Instance : Descendant;
begin
Instance.Paint();
Base(Instance).Paint();
Das sind zwei unterschiedliche Methoden, Erstere gibt dir den abstract error, da sie nix hat, was sie ausführen könnte.
Bist du innerhalb von Base greifst du also auf die Methode zu, von der du verlangst, dass sie der Nachfolger implementiert:
Delphi-Quellcode:
procedure Base.DoSomething;
begin
Paint();
end;
Sollte also klar sein warum es knallt.
Zweiter Fehler, den du vllt gemacht hast:
Delphi-Quellcode:
procedure Descendant.Paint;
begin
inherited;
Damit zwingst du einen Call direkt auf die abstrakte Methode von Base -> *boom*
Also kurz und knapp:
a) überschreibe die Methode
b) kein inherited (ist ja sowieso nix zum Aufrufen da
)
btw: Du willst nicht wirklich bei jedem Zeichnen das Bild von der HDD laden, oder?
