Frage zur Vererbung von Methoden

[Captain Albern]

Danke Klaus, der Hinweis ab "abstract" hat gefehlt. Es funktioniert jetzt so, wie ich es mir vorstelle.

Zu der Frage:
Warum denkst Du, dass hier: ... TProtoBlock.draw aufgerufen wird?

Ich habe Test-Code eingetragen, der mir zeigt, welche Methode aufgerufen wird. Außerdem habe ich den Code mit dem Debugger schrittweise durchlaufen lassen.

[Captain Albern]

Für spätere Leser, die vielleicht die gleiche Frage gesucht haben und hier gelandet sind, ich habe folgendes geändert.

In TProtoBlock, die Methode auf abstract gesetzt und aus dem Implementation-Teil entfernt...
procedure Draw(var Dst:TImage);virtual;abstract; In TBitmapBlock ein override eingefügt. Ohne das gibt es zur Laufzeit einen Fehler...
procedure Draw(var Dst:TImage);override; Vielen Dank nochmal für die schnelle Hilfe !

[Jumpy]

"Polymorphie" ist meine ich das Stichwort/Prinzip, aus der Objektorientierten Programmierung, das du hier benutzen willst und was du zuletzt herausgefunden hast, ist die Art und Weise, wie man es in Delphi macht/deklariert.

Nur der Vollständigkeit halber, müsste man glaube ich sagen, dass das "abstract" keine Pflicht ist, aber hier wohl Sinn macht. Bei Mehrstufiger Vererbung ist vielleicht in der untersten Ebene eine Methode als abstract+virtual deklariert, in den darüberliegenden dann ggf. als override+(ggf. wieder virtual).
Hoffe ich hab das jetzt richtig beschrieben?

[Dennis07]

Zitat von Captain Albern:

Ohne das gibt es zur Laufzeit einen Fehler...

Kommt immer drauf an. Wenn du eine abstrakte Methode aufrufst, dann ja. Ohne override steht da implizit immer "reintroduce", allerdings wird, anders als beim expliziten "reintroduce" immer eine Wahrnung ausgegeben.
Solltest du also die neu eingeführte Methode anstatt der ursprünglichen aufrufen, bekommst du keine Fehlermeldung. Ein "inherited" ist nebenbei bemerkt auch in so einem Fall möglich.