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...
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