Hallo,
das Problem ist jedoch, dass ich ja nicht weiß, wie groß die einzelnen Blöcke sind. Jeder Leseaufruf eines
Unicode-Strings sieht dementsprechend bei mir so oder ähnlich aus:
Delphi-Quellcode:
fs.Read(bufSize, 4); bufSize := ChangeEndian32(bufSize);
wbuf := StringOfChar(#00, bufSize*2);
fs.Read(wbuf[1], bufSize*2); wbuf := SwapString(wbuf);
writeln('Locale: ', wbuf);
Soweit ich das verstanden habe, hilft mir ein Record hier nicht weiter.
Gruß
Christopher