Unicodestring in stream speichern

[himitsu]

Ja, es gibt bei UTF-16 die beiden Habvergessenwiedieheißen Zeichenpaare, aber dort die als 2 Zeichen gezählt.

[DrUArn]

Hi,
danke an alle Diskutanten - habe schon geahnt, daß ich eine Lawine zu dem Thema lostrete.

@ DeddyH: ist einfach ein tstream

und dennoch

nehmen wir in meinem Beispiel an astring:='Willi'

d.h. length(astring) ist 5

In meinem Beispiel 1 werden 5 Byte (?) gespeichert und wieder gelesen. Der Inhalt von Astring ist 'Willi'.

In meinem Beispiel 2 werden 10 Byte (?) gespeichert und wieder gelesen.
Läßt man hier SetLength(astring,i div 2) weg, steht in in Astring z.B. 'Willi#0blblab'. Danach geschehen unwägbare Dinge im Programm.

Wieso muß ich diese 5 zusätzliche Byte speichern, die nichts mit dem String zu tun haben - wird ja durch #0 beendet?

MfG
Uwe

[Uwe Raabe]

Zitat von DrUArn:

nehmen wir in meinem Beispiel an astring:='Willi'

d.h. length(astring) ist 5

In meinem Beispiel 1 werden 5 Byte (?) gespeichert und wieder gelesen. Der Inhalt von Astring ist 'Willi'.

Setz doch vor dem Lesen von Astring mal AString := 'Klaus';

[Bernhard Geyer]

Hab ich mir es doch fast gedacht: Du hast in deinem String einen Ansi-String.

Schau dir mal folgende Quellen an:

http://docwiki.embarcadero.com/RADSt..._in_RAD_Studio
http://docs.embarcadero.com/products...TEncoding.html
http://docs.embarcadero.com/[e-mail]

Damit solltest du eine korrekt Implementierung hin bekommen.

[DrUArn]

Hi, community,

@ Uwe Raabe: Der Versuch lohnte sich - mein Beispiel 1 liest dann nur zufälliges ein - Beispiel 2 arbeitet korrekt!
Danke!

Nun muß ich das erst verstehen - dazu sind aber z. Zt. meine Kenntnisse für Unicode etc. zu gering - also lernen!
Bisher war ja oft für mich string ein shortstring und der läßt sich wohl auf Methode 1 korrekt speichern und lesen!

MfG
Uwe