Spaltenweise auf TStringList zugreifen

[aaaaaaaaaa_10]

Hatte ich eben auch in ähnlericher Form schon.

Delphi-Quellcode:

z := Zeilenanzahl-1;
          begin;
            for s := 0 to Spaltenanzahl-2 do
            begin
              StringArray[s,Zeilenanzahl-1] := ZwSpeicher.Strings[s+2];
              Temp := (StringArray[s,z]) + ';';
              TestDatei.Write(PChar(Temp)^,Length(Temp));
            end;
           Temp := (StringArray[s,z]) + #13#10;
           TestDatei.Write(PChar(Temp)^,Length(Temp));
          end;