Das Aufteilen geht mit
PosEx &
Copy. Sprich: Du suchst dir mit PosEx die Position aus, ab der du den String aufteilen willst, holst dir mit copy den Teilstring raus und schiebst ihn in den benötigten String.
(Hier gibts einiges dazu). Zum Horten der einzelnen Teilstrings wäre wohl am besten ein Array geeignet, insbesondere wenn man sich den 2. Teil ansieht:
Dort einfach in einer for-Schleife die Strings entweder in eine Temporäre Variable schreiben, oder gleich direkt an Edit.Text zuweisen. Da geht dann ganz einfach [i]TempString := TempString + Array.
greetz
Mike