Unicode2Str [Erledigt]

[Jan]

Ich arbeite mit SET CHARSET TO ANSI. Und lese eine Unicode-Datei mit 110 kB über FRead() in eine Variable ein. Die möchte ich dann in ANSI konvertieren. Also die neue Funktion Unicode2Str() drüberlaufen lassen. nach ca. 10 Sekunden kommt eine Fehlermeldung. Die XppError.log ist 198 MB (!) groß und nicht lesbar. Ich habe deswegen mal die Laufzeitmeldung selber unten eingefügt.

Zwischenablage01.jpg (48.27 KiB) 2857 mal betrachtet

Die Zeile GEDCOMEINLESEN(223) wird mit

Code: Alles auswählen

cInhalt := Unicode2Str(cInhalt)

die Konvertierung durchgeführt. Sollte sie jedenfalls.

Was passiert da?

Jan

[AUGE_OHR]

Die Zeile GEDCOMEINLESEN(223) wird mit

Code: Alles auswählen

cInhalt := Unicode2Str(cInhalt)

die Konvertierung durchgeführt. Sollte sie jedenfalls.

den Source findest du unter c:\ALASKA\XPPW32\Source\SYS\activex.prg.

Ich habe mich auch schon daran versucht, aber WideCharToMultiByte ist wohl noch nicht das richtige für UTF-8

[Jan]

Hallo Jimmy,

nicht daß Du das was zusammenschmeißt, was nicht zusammengehört: Ich brauche beides, Unicode UND UTF8! Und hier in diesem Thread ist das Problem einfach, daß das Konvertieren von Unicode nach ANSI nicht funktioniert. Zumindest nicht bei dieser längeren Zeichenkette.

Jan

[brandelh]

Hi,

ist UTF-8 nicht ein 8 Bit Zeichensatz ?

[Jan]

Hubert,

ja, genau. Aber dieses Problem ist ja zum Glück schon gelöst. Jimmys Beispiel war genau das, was ich brauchte.

Jan

[brandelh]

Hi,
ist UTF-8 nicht ein 8 Bit Zeichensatz ?

NEIN, es ist kein 8 Bit Zeichensatz, sondern eine Transformation von Unicode in ein 8 Bit Transferformat ... nur um mich zu verbessern

http://de.wikipedia.org/wiki/UTF-8

im UTF-8 Thread neben an gibt es eine Funktion die die Kodierung zurückrechnet.

[Jan]

Till hat dazu den PDR 6207 angelegt.

Jan