Codierung Stringstream????

[Highttower]

Hallo himitsu,

vielen dank für die fixe Antwort, das habe ich aber leider schon versucht. Das Problem bei mir ist:

Delphi-Quellcode:

procedure foo(AnsiStream);
var 
    Content : UTF8String;
begin
    Content := AnsiToUtf8(AnsiStream.DataString);

    Content := '<?xml version="1.0" encoding="UTF-8" standalone="yes"?>' + XMLKlasse.OpenStandartKnoten + Content + XMLKlasse.CloseLast;

    // hier bin ich früher hin gegangen und habe das ganze in verschiedene Stringsversucht zu schreiben und sie kamen alle in der Datei an
    // aber ANSI Codiert, was zur Folge hatte das die Datei nicht mehr zu gebrauchen war. Einfach den BOM davor zu schreiben reicht nicht

end;

Den UTF8BOM gibt es im übrigen auch als Array in der SysUtils. Man schreibt ihn dadurch kinderleicht mit:

Stream.Write(UTF8BOM[0],3); Viele Grüße,

Tobi