En-tête XML

J'ai le code suivant :

Code:

---

1 2 3 4 5 6 7 8 9 10

FichierXML = new TXMLDocument(""); FichierXML->Active = true; FichierXML->Version = "1.0"; FichierXML->Encoding = "ISO-8859-1"; FichierXML->Options.Contains(doNodeAutoIndent); FichierXML->Options.Contains(doAttrNull); FichierXML->Options.Contains(doAutoSave);   FichierXML->DocumentElement = FichierXML->CreateElement("AS400", "");

---

se qui me génère l'entête suivante

Code:

---

1 2 3

<?xml version="1.0" encoding="ISO-8859-1"?> <AS400>

---

Et j'aimerai avoir l'en-tête comme cela

Code:

---

1 2 3

<?xml version="1.0" encoding="ISO-8859-1"?> <AS400 version="1.0" type="productdefinition">

---

Est-ce que qqun aurai une solution car ça fais un petit moment que je cherche mais je ne trouve rien.

Merci d'avance

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

TXMLDocOptions XmlOptions; FichierXML->Active = true; FichierXML->Version = "1.0"; FichierXML->Encoding = "ISO-8859-1"; XmlOptions.Clear(); XmlOptions << doNodeAutoCreate << doNodeAutoIndent << doAttrNull << doAutoPrefix << doNamespaceDecl; FichierXML->Options = XmlOptions;   FichierXML->DocumentElement = FichierXML->CreateElement("AS400", ""); FichierXML->DocumentElement->Attributes["version"] = Variant("1.0"); FichierXML->DocumentElement->Attributes["type"] = Variant("productdefinition");   FichierXML->SaveToFile( "c:\\index.xml" ); FichierXML->Active = false;

---

Cordialement,

Arnaud

Merci les gars !!! C'est nickel !!!