Thema: Delphi Array in TStringList

Einzelnen Beitrag anzeigen

aaaaaaaaaa_10
(Gast)

n/a Beiträge
 
#9

Re: Array in TStringList

  Alt 30. Jul 2009, 15:27
Zitat:
Warum Spaltenzahl *3 ???
Weil ich pro Spalte 3 ArrayFelder habe

EDIT :
Delphi-Quellcode:
 i := 0; j := 1; k:= 3;
        while k <= ((Spaltenanzahl*4)-1) do
        begin
           Stringvar := Stringvar + floattostr(ValueArray[i,0])+#9+
                                    floattostr(ValueArray[j,0])+#9+
                                    floattostr(ValueArray[k,0])+#9;
           i := i+4; j := j+4; k := k+4;
        end;

        Min.Add(DatUhr + Stringvar);
Habs damit hinbekommen.
  Mit Zitat antworten Zitat