text datei zerlegen fürs einladen in eine listview

[BrunoT]

Hi amg65,

die Strings stehen in dem dyn. Array, welches von explode zurückgegeben wird.

Delphi-Quellcode:

type TSTringdynarray = array of String;

Var
 ar:TSTringdynarray;
 i,Anz_Token:Integer;
 s:string;
Begin
...
  s:='81.41.73.10 80 10.10.2003 09:51:24 Yes NO 00:00:01'; 
  Anz_Token:=7;
  setlength(arr,Anz_Token);
  ar:=explode(' ',s, Anz_Token);
...
  for i:=0 To Anz_Token-1 do
  memo1.lines.add(ar[i]);
...

//ungetestet


mfg

BrunoT