InsertXMLStructure()

Syntax

Ergebnis = InsertXMLStructure(ElternKnoten, *Puffer, Struktur [, VorherigerKnoten])

Fügt den angegebenen Struktur-Speicher als einen neuen XML-Knoten in den angegebenen Elternknoten ein.

Parameter

ElternKnoten	Der Knoten, in welchen der neue Knoten eingefügt werden soll. Um den neuen Knoten an der Wurzel des XML-Baums einzufügen, kann hier RootXMLNode() verwendet werden.
*Puffer	Die Adresse der Struktur, welche in die XML-Struktur eingefügt werden soll.
Struktur	Der Typ der einzufügenden Struktur.
VorherigerKnoten (optional)	Ein Unterknoten ("child") des 'ElternKnoten', nach dem der neue Knoten eingefügt werden soll. Ist dieser Wert gleich 0 oder nicht angegeben, dann wird der neue Knoten als erster Unterknoten seines Elternknotens eingefügt. Ist dieser Wert gleich -1, dann wird der neue Knoten als letzter Unterknoten seines Elternknotens eingefügt.

Rückgabewert

Der neue XML-Knoten, wenn er erfolgreich erstellt wurde - oder Null, wenn an dieser Stelle kein Knoten eingefügt werden konnte.

Anmerkungen

Die bei CreateXMLNode() angegebenen Regeln, wo ein neuer Knoten eingefügt werden kann, gelten auch für diese Funktion.

Der eingefügte Knoten wird wie die Struktur benannt. Jedes Struktur-Element wird als ein Unterknoten innerhalb des Struktur-Knotens hinzugefügt. Jedes '*' bzw. '$' Zeichen wird dabei aus dem Namen des Struktur-Elements entfernt. Wenn das Struktur-Element ein Array, Liste, Map oder Struktur beinhaltet, werden rekursiv weitere Knoten hinzugefügt. Siehe unten für ein Beispiel der erstellten XML-Struktur.

Beispiel

  ; Dieses Beispiel erzeugt folgende XML-Struktur:
  ;
  ; <Person>
  ;   <Name>John Smith</Name>
  ;   <Age>42</Age>
  ;   <Books>
  ;     <element>Investing For Dummies</element>
  ;     <element>A Little Bit of Everything For Dummies</element>
  ;   </Books>
  ; </Person>  
  ;
  Structure Person
    Name$
    Age.l
    List Books.s()
  EndStructure
  
  Define P.Person
  
  P\Name$ = "John Smith"
  P\Age   = 42
  AddElement(P\Books()): P\Books() = "Investing For Dummies"
  AddElement(P\Books()): P\Books() = "A Little Bit of Everything For Dummies"

  If CreateXML(0)
    InsertXMLStructure(RootXMLNode(0), @P, Person)
    FormatXML(0, #PB_XML_ReFormat)
    Debug ComposeXML(0)
  EndIf

Siehe auch

ExtractXMLStructure(), InsertXMLArray(), InsertXMLList(), InsertXMLMap()

Unterstützte OS

Alle