Ich habe dir die Routinen als
Unit angehängt.
Das Problem ist hier, dass sich dein Code zwar an den Compiler anpasst, aber genau das ist das Problem, denn du hast im Stream keine Informationen darüber gepsiechert welches Format dieser Text hat.
Entweder sollten sich Daten die das Programm im Format nicht einfach so verändern, oder es sollte darin enthalten sein welches Format das ist und das auslesende Programm muß dann auch alle Formate kennen und und den Text dann in sein Format notfalls umwandeln können.