Um dir eine weitere Methode vorzustellen hab ich noch eine Lösung für dich. Du behälst deinen alten Code und nach der Schleife fügst du diesen Code ein: (Natürlich ist die andere Lösung sinnvoller - Dient nur zur Demonstration)
AusgabeBox.Text:=StringReplace(AusgabeBox.Text, sLineBreak, ',',[rfReplaceAll, rfIgnoreCase]);
Zum PageControl gibts erstmal nicht viel zu sagen. Einfach auf die Form ziehen, die Subpages erstellen (Rechtsklick auf die Komponente) und joa, die Subpages befüllen
