Aufteilen eines Strings in mehrere Zeilen (Leerzeichen)

[St.Pauli]

Ja können maximal 2 Leerzeichen hintereinander stehen oder ist die mögliche Anzahl der Leerzeichen nach oben offen? Wenn nein, dann mach doch einfach:

Delphi-Quellcode:

  s := StringReplace(s, '  ', #13 + #10, [rfReplaceAll]);
s := StringReplace(s, ' ', #13 + #10, [rfReplaceAll]);
writeln(s);