Das Problem ist, wie mkinzler schon gesagt hat, dass
SaveToFile()
leider den schon vorhandenen Inhalt überschreibt, d.h. du solltest das nach Möglichkeit selbst machen. Das kannst du entweder über Streams handeln, oder auch via
AssignFile(),
Reset() bzw.
Rewrite(),
Writeln() bzw.
Readln() erledigen.
Zuvor müsstest du dir allerdings das Format überlegen, in welchem du die Daten speichern willst. Du musst beim Auslesen später ja wieder den Text trennen können!
»Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)