string1+#0+string2+#0+string3+#0
Wenn 1 und 2 und 3 schon Delphi Strings sind? was gibt es da noch zu splitten?
Ansonsten...
Delphi-Quellcode:
SL := TStringList.Create;
SL.Text := StringReplace(string1+#0+string2+#0+string3+#0,#0,#13#10,[rfreplaceall]);
LOL