Mise en page d'un document XML

[Francis Gorge <francis.gorge@briq.com>]

Bonjour,

Je créé et j'exporte un fichier XML :

dim doc as XmlDocument
  dim VRpathvalue, Audiopathvalue as xmlCDATASection
  dim VRname,VRpath, controller, rotate, protect, setview, vrsize,  
setdimensions, aspectratio As XmlNode
  dim panorama as XmlNode =  
panoramashelf.AppendChild( doc.CreateElement("panorama"))
puis ajoute des Nodes :

  VRname = panorama.AppendChild(doc.CreateElement("VRname"))
  VRname.AppendChild(doc.CreateTextNode(ListedeVR(whichVR).MyVRname ))

  controller = panorama.AppendChild( doc.CreateElement("controller" ))
   
controller 
..AppendChild(doc.CreateTextNode(str(ListedeVR(WhichVR).MyVRController)))
etc ...

msgbox(doc.ToString)

Tout fonctionne parfaitement mais le fichier obtenu est illisible,  
j'aimerai pouvoir exporter un document XML formaté, avec sauts de  
lignes et des tabulation.
Est ce possible ?

Pour des raisons de développement j'utilise pour ce projet la version  
5.5.5 de RealBasic
Cordialement,

Francis Gorgé