Array zählt nicht hoch ?!

[aaaaaaaaaa_10]

Nee, bei jeder neuen Zeile wird abc=0 gesetzt.

Delphi-Quellcode:

z := Zeilenanzahl-1;
            abc := 0;
            begin;
              for s := 0 to Spaltenanzahl-2 do
              begin
                StringArray[s,z] := ZwSpeicher.Strings[s+2];
                Spalte := s;
                Zeile := z;
                TabWert := (StrToFloat(StringArray[s,z]));
                SetLength(ValueArray,Spaltenanzahl*4,1);  // 4 Felder pro Spalte (Min, MAx, Sum, Avr)
                WerteBerechnen;
                Temp := (StringArray[s,z]) + ';';
                TestDatei.Write(PChar(Temp)^,Length(Temp));
              end;
             StringArray[Spaltenanzahl-1,z] := ZwSpeicher.Strings[ZwSpeicher.Count-1];
             Spalte := Spaltenanzahl-1;
             Zeile := z;
             TabWert := (StrToFloat(StringArray[Spaltenanzahl-1,z]));
             WerteBerechnen;
             Temp := (StringArray[Spaltenanzahl-1,z]) + #13#10;
             TestDatei.Write(PChar(Temp)^,Length(Temp));
            end;