String in Array einlesen

[jupiter4065139]

ok, wie müsste die getcol Funktion ungefähr aussehen?


ich hab noch ne frage: Wie müsste ich denn das machen um den gesamten string mit allen zeilen in die Liste einzulesen

Delphi-Quellcode:

mystring := col1 + #9 + col2 + #9 + col3 + #13#10;   //AK

              strl:=Tstringlist.Create;
              strl.add(mystring);
              strl.SaveToFile('liste.txt');

so gibt er mir nur eine zeile wieder

[p80286]

Dann kommen wir doch mal hierauf zurück

Zitat:

Zitat von jupiter4065139 (Beitrag 1217457)

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.

Delphi-Quellcode:

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;