Strings zusammenfügen

[Nils_13]

Hi,

ich habe ein Programm, welches mir alle Leerzeichen in eine neue Zeile verwandelt, außer es kommt mehrfach ein Leerzeichen hintereinander vor. Wie kann man aus einen aufgespaltenem String (" oder ') eine ganze Zeile machen ?
Also aus
"Hello
world"
wieder
"Hello world"

Ich habe bisher diesen Code, funktioniert natürlich noch nicht

Delphi-Quellcode:

  ad := Pos('"', result[i]); 
  ae := Pos('"', result[> ad]); // > ad gibt es halt nicht
  if (result[ad] = '"') and (ae) then
    ReplaceString(result[],#13#10,#20,rfReplaceAll);