WideString / Unicode in INI schreiben

[CodeX]

ihr merkt schon, ich bin gerade auf dem unicode-trip
bisher hat alles ganz gut hingehauen, wobei ihr einen großen teil dazu beigetragen habt danke!

jetzte stehe ich aber vor dem problem, dass ich auch gerne unicodetext in einer ini datei speichern würde.
der text liegt in einem widestring.
und normalerweise würde ich einen string ja so speichern:
ini.WriteString(xxx,yyy,MyWideString); das speichern geht zwar, jedoch werden alle unicodezeichen durch "?" ersetzt.
ich habe die ini datei außerhalb von delphi extra als unicode-textfile gespeichert. das bleibt dann sogar nach einem delphi zugriff immer noch unicode, jedoch hat das nichts geholfen.
ini.WriteWideString gibts leider nicht

also irgendwie den widesring in ansistring umwandeln, wobei die besonderen zeichen in #1234 umwandeln und dann erst speichern?
und wieder richtig auslesen?

... hilfe ...

[MosiXXL]

Hi,

wenn es noch keinen gibt, der bereits ein "TIniFileW" Object hat, dann könntest Du Dich selbst ans Werk machen. Die API Funktionen, welche von dem TIniFile Object verwendet werden, gibt es als A(ANSI) und W(Unicode) Variante.

Delphi-Quellcode:

function TIniFile.ReadString(const Section, Ident, Default: string): string;
var
  Buffer: array[0..2047] of Char;
begin
  SetString(Result, Buffer, GetPrivateProfileString(PChar(Section),
    PChar(Ident), PChar(Default), Buffer, SizeOf(Buffer), PChar(FFileName)));
end;

Die API Funktion GetPrivateProfileString gibt es als GetPrivateProfileStringA und GetPrivateProfileStringW. Bedeuted ein bischen Arbeit, aber unmöglich ist es nicht.

[Luckie]

Oder du suchst dir eine schon fertige Implementation der TIniFile Klasse für Unicode. Gibt es bestimmt irgendwo.

[Bernhard Geyer]

Unicode Enabled TIniFile

[Olli]

Zitat von Bernhard Geyer:

Unicode Enabled TIniFile

Glaubt mir, das (^---) wird einst der Tod von Delphi sein. Alle können Komponenten zusammenpappen, aber keiner kann sie schreiben

[Bernhard Geyer]

Zitat von Olli:

Zitat von Bernhard Geyer:

Unicode Enabled TIniFile

Glaubt mir, das (^---) wird einst der Tod von Delphi sein. Alle können Komponenten zusammenpappen, aber keiner kann sie schreiben

???? Versteh ich jetzt nicht was Du damit meinst

[Olli]

Zitat von Bernhard Geyer:

???? Versteh ich jetzt nicht was Du damit meinst

Daß du mit Verweis auf Kompos den Nachwuchs schädigst ...

[MosiXXL]

Hallo Bernhard,

kannst Du mir sagen in welcher Unit sich das TIniFile (Unicodeversion) Object befindet? Davon mal abgesehen, ist sicher hilfreich sich an so einem einfachen Object zu versuchen. Die Erfahrungen, die man dabei gewinnt, sind sehr hilfreich.

MFG

[Bernhard Geyer]

Zitat von Olli:

Zitat von Bernhard Geyer:

???? Versteh ich jetzt nicht was Du damit meinst

Daß du mit Verweis auf Kompos den Nachwuchs schädigst ...

Vergib mir
Aber wer mit Unicode sich herumplagen muß ist schon geschädigt genug

[Olli]

Zitat von Bernhard Geyer:

Vergib mir
Aber wer mit Unicode sich herumplagen muß ist schon geschädigt genug

Na gut Delphi und Unicode ist echt eine Plage, da hast du ganz recht. Umso höher muß man Leuten wie Troy anrechnen, daß sie solche Kompos zur Verfügung stellen.