Hmmm...
Bei
gS[ID_BLUEFLARE].Bitmap :=
also Index -4 kracht es beim einlesen der Bitmap.
Delphi-Quellcode:
procedure TSprite.SetBitmap(const Value: HBitmap);
begin
FBitmap := Value;
end;
Es sind alle Arrays mit TSprite.Create zugewiesen.
Das HBitmap
handle was übergeben werden soll ist auch korrekt.
getData ist wieder nicht zugewiesen.
gruss