Delphi-Quellcode:
procedure Delete(var SrcArray: Array of TSprite; Index: Integer);
var
I: Integer
begin
...
Setlength(SrcArray, length(SrcArray) - 1); //<< inkompatible Typen
end;
Das hatten wir heute schon mal: Siehe
hier
Lösung: TArray<TSprite>
Würde eventuell gehen. Danke.
Das Problem ist nur das ich einen Var Parameter übergebe.. eventuell entfernen?
Müsste eigentlich auch ohne gehen.
Ich kann es im Moment nicht testen da das nur eine Vorsichtsmaßnahme ist falls das HBitmap einmal 0 sein sollte.
EDIT:
Ich weiß jetzt nicht welche Auswirkungen es hat wenn ich
gs: Array of TSprite;
zu
gs: TArray<TSprite>;
ändere.
gruss