ich habe eine Klasse TBitMapExtension welche über ihre LoadFromFile, SaveToFile in der Lage ist eine Vielzahl von Grafikformaten (*.jpg, *.tig, *.png) zu verarbeiten
Über einen Cast übergebe ich die Klasse an eine Funktion welche für den Dateityp TBitmap entworfen wurde.
Delphi-Quellcode:
TBitMapExtension =
Class(
VCL.Graphics.TBitMap)
procedure LoadFromFile(
const Filename:
String);
override;
procedure SaveToFile(
const Filename:
String);
override;
public
......
end;
Delphi-Quellcode:
Procedure verarbeiteBMP ( ambp : TBitmap)
begin
w := abmp.width;
// hier kommt es zur AV
end;
Delphi-Quellcode:
/// Hauptprogramm
bmp := TBitMapExtension.Create;
bmp.loadfromFile();
verarbeiteBMP( TBitmap(bmp));
Warum bekomme ich in der Funktion verarbeiteBMP eine Zugriffsverletzung wenn ich die Weite eine Bitmap auswerten will ?