Ein gs[0] := TSprite.Create;
machst du aber schon irgendwo?
Nein mache ich nicht.
Wo soll die Objektinstanz dann herkommen?
Jo schon richtig..
Nur dann müsste ich für jede FData[abs(index)] die Classe TSprite erstellen.
Irgendwie ist die Classe so nicht verwendbar. Hmmm..
So wie die aufgebaut ist kann ich
NUR Negative werte inklusive 0 verwenden.
Die Icons haben aber Positive werte > max 100.
Delphi-Quellcode:
constructor TNegativeArray.Create(aLenght: Integer);
var
i: Integer;
begin
MaxValue := IIF(aLenght > 6, aLenght, 0); //Eigentlich quatsch da die Classe nur Negative werte unterstützt 7 wäre in dem Fall dann -7 und nicht 1 wie benötigt.
SetLength(FData, aLenght);
for i := 0 to aLenght do
FData[i] := TSprite.create;
end;
Aber trotzdem wird set und getData entfernt.
Siehe Pic.
gruss