Einzelnen Beitrag anzeigen

sko1

Registriert seit: 27. Jan 2017
577 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#1

XML Formatierungsproblem

  Alt 15. Aug 2017, 14:30
Hallo,

mein erstelltes XML mit
Delphi-Quellcode:
var
  Xml: IXMLDOCUMENT;
begin
    Xml := NewXMLDocument;
    Xml.Encoding := 'utf-8';
    Xml.Options := [doNodeAutoIndent]; // looks better in Editor ;)

und meiner Unterfunktion

Delphi-Quellcode:
function AddNode(Node: IXMLNode; NodeName: string; NodeInhalt: string)
  : IXMLNode;
var
  UNode: IXMLNode;
begin
  // in den übergebenen Node wird der neue NodeName eingefügt
  try
    UNode := Node.AddChild(NodeName);
    UNode.Text := NodeInhalt;
    Result := UNode;
  except
    on E: Exception do
      LogAusgabe(E.ClassName + ' in AddNode : ' + E.Message);
  end;
end;
ergibt folgendes XML (Auszug):

<ramostalTradeAddress> <ramostcodeCode>12333</ramostcodeCode>
<ram:LineOne>Bahnhof-Straße 5</ram:LineOne>
<ram:CityName>Musterhausen</ram:CityName>
<ram:CountryID>DE</ram:CountryID>
</ramostalTradeAddress>

Man sieht das in der ersten Zeile ein Zeilenumbruch fehlt, irgendwas läuft da schief, aber was?
Mist, die Smileys müsst Ihr Euch als ':p' denken!

Ciao
Stefan
  Mit Zitat antworten Zitat