strings aus txt file lesen

[Ultimator]

Delphi-Quellcode:

while not EoF(f) do
  begin
    ReadLn(f, s);
    s := copy(s, pos(':', s)+1, length(s)-pos(':', s));
    Memo1.Lines.Add(s);
  end;

Is ungetestet, müsste aber gehen.
Musst halt u.U. n bissl mit dem +1 rumspielen, evtl. musst dus vergrößern/verkleinern.

//rotes Kästerli?!