Delphi-Quellcode:
procedure TNegativeArray.SetLen(Len: Integer);
begin
SetLength(fData, Len + 5);
// Hier müssen noch entsprechend Instanzen von TSprite erstellt werden
// (nur für die, die neu hinzukommen)
end;
Ich glaube muss mal eine
VCL App erstellen mit der ich die Arrays prüfen kann.

Ob die Indizien stimmen.
gruss