Problem mit UTF8

[Grolle]

Hallo,

ich habe unter D2007 eine UTF8 content.xml-Datei aus einem ODT-Dokument (OpenOffice) wie folgt bearbeitet:

Delphi-Quellcode:

  sl := TStringList.Create;
  sl.LoadFromFile(tmpfolder + 'content.xml');
  sl.Text := UTF8Decode(sl.Text);
  
  dann ne Menge StringReplaces ......

  sl.Text := UTF8Encode(sl.Text);
  sl.SaveToFile(tmpfolder + 'content.xml');
  sl.Free;

Das klappt so unter D2010 nicht mehr. Es gibt Probleme mit der Datei, sobald Umlaute eingefügt werden.
Wie kann ich das ändern?

Viele Grüße ....

[himitsu]

SL.Text ist seit D2009 Unicode und kein Ansi mehr.

Delphi-Quellcode:

sl := TStringList.Create;
sl.LoadFromFile(tmpfolder + 'content.xml', Encoding.UTF8);
 
dann ne Menge StringReplaces ......

sl.SaveToFile(tmpfolder + 'content.xml', Encoding.UTF8);
sl.Free;

PS: warum bearbeitest du eine XML-Datei mit 'ner StringListe und nicht mit 'ner XML-Componente?

[Grolle]

Danke für deine Antwort,

Zitat von himitsu:

PS: warum bearbeitest du eine XML-Datei mit 'ner StringListe und nicht mit 'ner XML-Componente?

die meisten kamen mir etwas zu oversized für eine relativ kleine Textdatei vor. Werde mir demnächst mal deine Komponente genauer ansehen

Viele Grüße ...