Irgendwie will es nicht so recht.
Delphi-Quellcode:
procedure MoveIcon(Offset: integer);
var
K: integer;
begin
for K := -1 downto LBOUND do
sp[K].x := sp[K].x + Offset;
end;
Der linken Seite kann nichts zugewiesen werden.
wenn ich das property so auslege.
Data[index: Integer]: TSprite read getData write setData; default;
gruss
Mach aus TSprite eine Klasse anstelle eines Records dann gehts.
cu Ha-Jö