Sonderzeichen fehlen beim Auslesen einer XML

[hitz]

Ich lese die XML in ein StringGrid ein, die Anweisung zur unterschiedlichen Farbdarstellung habe ich mal rausgenommen:

Code:

var
   Dok : TXMLDocument;
   i, j, farbwert: Integer;
   s : string;

begin
   ReadXMLFile(Dok, pfad);
   Form1.StringGrid1.RowCount := Dok.documentElement.ChildNodes.Count+1;
   with Dok.DocumentElement.ChildNodes do
   begin
        for i := 0 to Count-1 do
        begin
             for j := 0 to Item[i].ChildNodes.Count-1 do
             begin
                  s := Item[i].ChildNodes.Item[j].FirstChild.NodeValue;
                  case j of
                  0,1 : begin
                           Form1.StringGrid1.Cells[j,i+1] := s;
                    end;
                  2 : begin
                           farbwert := strtoint(s);
                           case farbwert of 
                           [.....]
                    end;
                  3 : begin
                           Form1.StringGrid1.Cells[j-1,i+1] := s;
                    end;
                  end;
             end;
        end;
   end;
   Dok.Free;
end;

[himitsu]

hmm, sieht soweit ok aus, hätte ja sein können, daß du dieses erstmal selber einließt und dann erst ans XML-DOM übergibst.

Als ein Problem bei Lazarus empfand ich die komische Mischung von UTF8String und anderen Stringtypen,
da müßtest du mal nachsehn, ob da nun alles stimmt.
> Was für ein Typ ist denn "string" (also intern) und wie sieht es mit NodeValue und Cell aus?

[hitz]

Ich glaube Lazarus ist standardmäßig auf utf8 eingestellt, jedenfalls sagt mir das meine kurze Suche im Internet. Dabei bin ich auch auf den Befehl utf8encode() gestoßen und habe den eingefügt:

Code:

aus
s := Item[i].ChildNodes.Item[j].FirstChild.NodeValue;
wurde
s := utf8encode(Item[i].ChildNodes.Item[j].FirstChild.NodeValue);

Und was soll ich sagen? Es funktioniert, nur warum weiß ich nicht

/edit: Könnte es sein, dass die .NodeValue einen nicht-utf8 string ausgibt, obwohl in der XML utf8 verwendet wird?

[Bernhard Geyer]

Zitat von hitz:

Ich glaube Lazarus ist standardmäßig auf utf8 eingestellt, jedenfalls sagt mir das meine kurze Suche im Internet. Dabei bin ich auch auf den Befehl utf8encode() gestoßen und habe den eingefügt:

Lazarus hat UTF8 als Standard-Unicodecodierung gewählt. Aber es gibt scheinbar noch genügend Stellen an denen einmal zu viel oder zu wenig utf8encode/utf8decode aufgerufen wird. Hatten in letzten Zeit öfter schon UTF8/Unicodefragen die auf Implementierungsfehler zurückzuführen waren.

[himitsu]

Wenn ich's richtig verstanden hab, dann ist FreePascal wohl immernoch ANSI, weswegen Lazarus nun UTF8 für sein Unicode nutzt (der UTF8String entspticht ja in der Zeichen-Größe dem AnsiString) ... sozusagen als Kompatibilität. Und da wurden halt öfters mal einige Stellen vergessen umzustellen.

[hitz]

Nun läuft ja alles wie es soll
Danke für die Aufklärung bzgl Zeichekodierungsproblemen und die schnelle Hilfe bei der Lösung meines Problems