Hi,
Danke für die Antwort, aber daran kann es eigentlich nicht liegen, weil der Code garnicht bis dahin ausgeführt wird. Die Prozedur bricht immer an der Stelle "FS.Position < FS.Size" ab, da Size nach dem ersten Aufruf von R.ReadString plötzlich 0 ist.
Habe jetzt abgespeckte Versionen von TReader und TWriter "nachgebaut" und mit denen funktioniert es problemlos
Ciao
Dani H.
At Least I Can Say I Tried