.. ich hatte es so gemeint.
Delphi-Quellcode:
memo.lines.beginUpdate;
while p <> 0 do
begin
zl := copy(inbuffer, 1, p - 1);
Memo.lines.Add(zl);
inbuffer := copy(inbuffer, p + 2, inbuffer.Length - p - 1);
p := pos(cr + lf, inbuffer);
end;
memo.lines.endUpdate;
Ob es Sinn macht, hängt auch davon ab, wieviele Zeilen addiert werden.
Grüße
Klaus