String in Array einlesen

[p80286]

Dann kommen wir doch mal hierauf zurück

Zitat von jupiter4065139:

Hallo,

ich hab hier ne kleine rechnung, in der ich ungefähr 100 Werte in jeweils 3 Spalten erzeugt habe und die dann als .txt ausgebe. So z.B.

mystring := Spalte1 + #9 + Spalte2 + #9 + Spalte3 + #13#10;

Bevor Du Deine Rechnungsergebnisse schreibst, liegen sie ja einzeln vor und es sollte kein Problem sein sie col1,col2... zuzuweisen.
Wenn es denn unbedingt der Text sein muß dann vllt so

Delphi-Quellcode:

function Getcol(lfnr:integer;mytext:string;delim:char);
var
  delimll:tstringlist;
begin
  delimll:=Tstringlist.create;
  delimll.delimter:=delim;
  delimll.Delimitedtext:=mytext;
  result:=delimll[lfnr];
  delimll.free;
end;

Ist nur so runter getippt. Beachte das lfnr von 0..irgendwas geht!

Gruß
K-H

end;