Zeilen auslesen/Mehrzeiliges Eingabefeld

[_frank_]

mal als kleine Hilfe...

Delphi-Quellcode:

var i:integer;
    s:string;
begin
  for i:=0 to memo1.lines.count-1 do
  begin
    s:=memo1.lines.strings[i];
    showmessage(s+' in Zeile '+IntToStr(i+1));
  end;
end;

HTH Frank