Hallo,
schon mal versucht die Schleife
Delphi-Quellcode:
for y1:=0 to MapData.Count do //ergibt 20
begin
x1:=1;
x2:=2;
x3:=3;
x4:=4;
for i:=0 to ((length(MapData[0])+1)div 5) do //ergibt in meinem Fall 30
begin
aktuell[0]:=((MapData[x1][y1])+(MapData[x2][y1])+(MapData[x3][y1])+(MapData[x4][y1])); //<= Langes
bis MapData.count -1 laufen zu lassen?
Grüße
Klaus