Habe es mal eingebaut.
Data[index: Integer]: Variant read getData write setData; default;
Hoffe mal das Variant korrekt ist.
Nein ist es nicht. Das
Data[Index : Integer] : Irgendwas
Stammte noch aus dem Beispiel davor. Korrekt wäre
Data[Index : Integer] : TSprite read getData write setData; default;
getData und setData sind ja auch mit TSprite deklariert.
Jetzt musst Du schon selbst weitermachen, ich muss los.
cu Ha-Jö