Notfalls könnte man auch umbrechen
Code:
string_out := copy(AContent, [color=#ff0000]pos(':', AContent)[/color] + 1,
length(AContent) - [color=#ff0000]pos(':', AContent)[/color]);
Die wohl Beste Lösung wurde ja schon gesagt,
aber bei solch ähnlichen Problemen könnte/sollte man gleiche Dinge auslagern und nur einmal aufrufen.
Einmal Suchen reicht ja und es würde auch an Rechenzeit was eingepart.
z.B.:
Delphi-Quellcode:
i := pos(':',AContent);
string_out := copy(AContent, i + 1, length(AContent) - i);
PS: auch wenn Leerzeichen die Zeilen verlängern, können sie ungemein das Lesen erleichtern.