Einzelnen Beitrag anzeigen

Keldorn

Registriert seit: 6. Mär 2003
Ort: Meißen
876 Beiträge
 
Delphi 10.1 Berlin Professional
 
#1

Problem bei XML-Erstellung / Schemenangabe

  Alt 26. Okt 2004, 19:52
Hallo

Ich gebs auf … ich habe schon mehrere verschiedene Sachen ausprobiert und komme einfach nicht auf einen grünen Zweig. Und da ich mich das erste Mal mit XML beschäftige, weiß ich nicht so recht weiter.
Eine von uns genutzte Anwendung erwartet als Importfunktion eine XML-Datei. Diese sieht ungefähr so aus:
Code:
  <?xml version="1.0" encoding="windows-1252" ?>
- <OpenShipments xmlns="x-schema:.\OpenShipments.xdr">
- <OpenShipment ProcessStatus="">
- <Receiver>
        … unterknoten mit den Daten
  </Receiver>
- <Shipment>
        … unterknoten mit den Daten
  </Shipment>
  </OpenShipment>
  </OpenShipments>
Mit folgendem code
Delphi-Quellcode:
  xmlDoc := CoDOMDocument30.Create;
  xmlDoc.validateOnParse := false;
  xmlDoc.resolveExternals := false;

  XMLdoc.loadXML('<?xml version="1.0" encoding="windows-1252" ?>'+
                 '<OpenShipments xmlns="x-schema:.\Openshipments.xdr">'+
                 '<OpenShipment ProcessStatus="">'+
                 '</OpenShipment>'+
                 '</OpenShipments>');

  root:=XMLdoc.selectSingleNode('OpenShipments/OpenShipment');

  Empfaenger := xmlDoc.createElement('Receiver');
  if Empfaenger<>Nil then
    begin
       ….
      root.appendChild(Empfaenger);
    end;

  xmlDoc.save(blabla);
entsteht aber:
Code:
  <?xml version="1.0" encoding="windows-1252" ?>
- <OpenShipments xmlns="x-schema:.\Openshipments.xdr">
- <OpenShipment ProcessStatus="">
  <Receiver xmlns="" />
  </OpenShipment>
  </OpenShipments>
Da steht aber nun ein xmlns=““ hinter Receiver, was nicht hingehört. Der Fremdanwendung scheint es auch nicht zu gefallen und es kommt zu einem Fehler, dass receiver nicht gefunden wurde. Editiere ich die Datei und lösche das xmlns=““ geht’s zumindestens einen Schritt beim importieren weiter.
Nehme ich CoDOMDocument40.Create; ist root immer nil, verstehe ich auch nicht.

Versuche ich es mit:
Delphi-Quellcode:
  XMLdoc.loadXML('<?xml version="1.0" encoding="windows-1252" ?>'+
                 '<OpenShipments>'+
                 '<OpenShipment>'+
                 '</OpenShipment>'+
                 '</OpenShipments>');
Gibt es in der Fremdanwendung auch wieder einen Fehler, das das Schema nicht angegeben wurde … dafür steht hinter receiver auch kein xmlns=““ mehr.

Fragen:
Woher stammt das xmlns=““ ? was hat das überhaupt zu sagen ?
Wie bekommt man diese Schemenangabe (xmlns="x-schema:.\OpenShipments.xdr ) ohne loadxml mit rein oder wie kann man die nachträglich setzen? (wenn ich bei loadxml diese Angaben weglasse, erscheint auch nicht dieses xmlns=““ hinter receiver, also genau das, was ich will).

Danke im Voraus

Frank

edit: Schreibfehler in Überschrift ausgebessert

Lükes Grundlage der Programmierung:
Es wird nicht funktionieren
(Murphy)
  Mit Zitat antworten Zitat