Klassen, Vererbung und CAST

[Blup]

Übergeben wird ein Nachkomme von "VCL.Graphics.TBitMap".

Delphi-Quellcode:

...
verarbeiteBMP( TBitmap(bmp));

Das ruft ja richtig: "Ich bin keine Nachkomme von der TBitmap-Klasse, die diese Funktion erwartet."

Siehe himitsu, so bekommt man auch die richtige Fehlermeldung und läuft nicht in eine Zugriffsverletzung:

Delphi-Quellcode:

...
verarbeiteBMP(bmp as TBitmap);