Probleme mit Typ. Dateien und Unicode

**samy99**

Guten Tag

Bin von einer älteren Delphi Version auf Delphi 2010 umgestiegen und bin daran einige meiner Projekte in die neue Version zu konvertieren.

Ich verwende dabei eine Record-Datei in die nun diverse Strings gespeichert werden sollen. Früher waren dies normale Ansi-Strings, neu sollten diese natürlich auch Unicode unterstützen.

Wenn ich so vorgehe, wie in diesem Code-Beispiel, werden die Unicode-Strings in Ansi-Strings umgewandelt, und dabei die weiteren Information zerstört bzw. gehen verlohren. String ist Unicode String[x] ist Ansistring...

zusammenfalten · markieren

Delphi-Quellcode:

			type

 RTest = record      

    Str1:String[20]; 

    Comts:String[30]; 

    id:longint;

  end;

Procedure Test(filename:string);

var

  f: file of RTest;

  a: RTest;

begin

  a.Str1:='Test1';

  a.Comts:='Test...';

  id:=1000;

  AssignFile(f,filename);

  Rewrite(f);

  Write(f,a);

  CloseFile(f);

end;

Wie kann ich einfach und sicher Unicode-Strings in einer solchen Datei speichern?

Vielen Dank für einen Tipp.

Mit freundlichen Grüssen
Sam

Probleme mit Typ. Dateien und Unicode

Probleme mit Typ. Dateien und Unicode

Forumregeln