Unicode in eine Textfile Speichern

[Domi]

Guten Tag,

Ich hoffe erstmal ich bin hier im richtigen Forum dafür, weil für euch ist die Frage wahrscheinlich ziemlich einfach, aber mein momentanes Wissen und Suchen in Hilfen übersteigt es.

Nun gut, also ich schildere das Problem recht simpel. Ich habe einen Unicode, also kyrillische Schriftzeichen zum Beispiel. Nun möchte ich diese Zeichen in einer Datei abspeichern, damit man sie später wieder abrufen kann. Jedoch gehen diese eben verloren wenn ich es in eine Datei abspeichere des Typs "Textfile"... und "file of widestring" ist ja nicht machbar... Ich hab mir überlegt die Datei so zu deklarieren dass sie ein Array of Char Zeichen darstellt.. aber irgendwie hab ich das auch nicht wirklich hinbiegen können. Vielleicht kann mir einer sagen ob dass der richtige Weg ist und ich mir da nur mehr Mühe geben sollte oder ob es eine andere Methode für sowas eigentlich recht einfaches gibt?

mfg
Domi

[mkinzler]

Du könntest sie binär in eine Datei speichern, in einen Datenbank oder als RTF.

[Gausi]

Oder du nimmst eine Unicode-fähige Komponente, wie z.B. TntMemo aus den TNTControls. Damit einfach SaveToFile (wie bei ner normalen Memo auch), und man hat das Unicode-Gedöns in einer Textdatei.

TntStrings/TntStringlist kann man natürlich auch nehmen.

[r2c2]

es gibt IMHO da 2 Möglichkeiten:
a) ne 3rd-Party-Komponente/Klasse nehmen, die das kann
b) selber machen

zu b) musst du aufpassen, dass je anch Unicode-Variante auch mal 16Bit nötig sind(UTF8<-->UTF16). Also n array of Char geht nur bedingt(UTF8 mit aufpassen bei nicht ASCII-Zeichen)... ggf. is auch ne Art Header möglich(das Teil hat noch irgend n Namen, weiß aber nicht mehr welchen), der die Art der Codierung angibt...

Wenn ich Blödsinn rede, korrigiert mich. Hab mit Unicode bisher relativ wenig gemacht...

mfg

Christian

[Ralf Kaiser]

Zitat:

Zitat von r2c2

ggf. is auch ne Art Header möglich(das Teil hat noch irgend n Namen, weiß aber nicht mehr welchen), der die Art der Codierung angibt

BOM = Byte Order Mark

Siehe auch: http://de.wikipedia.org/wiki/Byte_Order_Mark

Ciao,
Ralf

[Domi]

Puh.. danke für die vielen Antworten... leider hab ich ehrlich gesagt das meiste nicht verstanden und mich jetzt nochmal daran versucht mit Array of Widechar und naja hat geklappt :). Also dann danke ich auf jeden Fall! Bin ich schonmal einen Schritt weiter ;).

[mkinzler]

Mit welchen Komponenten verwaltest/verarbeitest du die Texte den?

[Ydobon]

Interessante Frage, Komponenten, die mit Unicode umgehen können, dürften auch Möglichkeiten haben diesen auf die Platte zu bringen.

Ansonsten geht es auch ohne zusätzlichen Aufwand mit den Delphi Hausmitteln. TFileStream frisst so ziemlich alles und mit UTF8Encode bzw. UTF8Decode kann man es wie normale Ansistrings behandeln. Dann funktioniert auch die Textfile.

[Domi]

Hi, tut mir Leid ich bin noch nicht soo erfahren mit Delphi und all seinen Funktionen, mach es erst seit so 1 1/4 Jahr halt in der Schule!

Nun gut also ich mache es so momentan,dass ich mir eben die TNTEdit felder reingeholt habe, weil ohne Widestrings geht es eben doch nicht und dann wird alles über Umwege die ja jetzt nicht soo wichtig sind dann in eine file of Widechar reingesteckt... also falls es wen interessiert das sieht beim speichern bei mir so aus:

Delphi-Quellcode:

    
    Liste.reset_next;
    AssignFile(Speicher,'Vok.txt');
    Rewrite(Speicher);



    for i:= 1 to Wortlaenge do
    begin
      wort[i] := (Liste.getelement as TVokpaar).GibRussisch[i];
      Write(Speicher,wort[i]);
    end;
    for i:= 1 to Wortlaenge do
    begin
      wort[i] := (Liste.getelement as TVokpaar).GibDeutsch[i];
      Write(Speicher,wort[i]);
    end;
    case (Liste.getelement as Tvokpaar).GibStatus of
      gekonnt:  wort[1] :=  '1';
      selten:   wort[1] :=  '2';
      nie:      wort[1] :=  '3';
    end;
    Write(Speicher,wort[1]);

Ist wahrscheinlich nicht die eleganteste Art und Weise, aber das meiste andere übersteigt meine bekannten Kreise... Aber ich denke Streams werde ich noch demnächst lernen... irgendwann mal ;). Achja falls sich wer fragt, wofür das Programm ist, dass soll mal einen Russisch Vokabeltrainer darstellen. Ist auch schon fast bereit dazu angewendet zu werden :).

mfg
Domi

[himitsu]

Über die Suche hätte man zwar den Grund auch nochmal finden können, aber ich sag's gern nochmal ._.

TextFile ist nicht unicodefähig :warn:
(das hast'e ja schon mitbekommen)

Der Grund:
Write/WriteLn nimmt zwar einen WideString (Unicode) an, wandelt dieses aber in Ansi um, bevor es in der Datei gespeichert wird.
Bei Read/ReadLn ist es dann andersrum.