String teilen???

[Luckie]

Er woillte jede einzeln haben:

Delphi-Quellcode:

var
  s: String;
  Loop: Integer;
begin
  for Loop := 0 to Memo1.Lines.Count - 1 do
  begin
    s := Memo1.Lines.Strings[Loop];
    ShowMessage(s);
  end;