Hi,
ich bin echt vergesslich zur Zeit
Delphi-Quellcode:
procedure SetNodeText(Node: IXMLNode; Name, Value: WideString);
var
Temp: IXMLNode;
begin
if Node <> nil then
begin
Temp := Node.ChildNodes.FindNode(Name);
if Temp = nil then
Temp := Node.AddChild(Name);
if Temp <> nil then
Temp.Text := Value;
end;
end;
Wenn ich das mit UTF8Encode weglasse, klappt das leider trotzdem nicht. Der Fehler bleibt