Bonjour tout le monde.
Je m'interroge sur le pourquoi de la création d'un fichier xml vide. En gros mon fichier est vide, 0 octet

En scrutant les exemples de créations puis de lecture, j'ai tenter de faire un fichier qui ressemble à ceci:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
<...déclaration...>
<RPG>
      <Talundra>
            <Concepteur>Elibom</Concepteur>
            <Date>25/06/2009</Date>
      </Talundra>
      <Deolia>
            <Concepteur>Elibom</Concepteur>
            <Date>25/06/2009</Date>
      </Deolia>
</RPG>
Bien sur j'ai d'autres "fiches" (noeuds) qui doivent au fur et à la mesure se créer avec un nouveau concepteur.

Pour faire ma tentative, je me suis inspiré des liens: http://www.developpez.net/forums/d36...e-fichier-xml/ et http://www.developpez.net/forums/d26...txmldocumment/

Toutefois j'ai fait ce code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
        //Créer un fichier xml
        Form1->XMLDocument1->Active = true;  // Activer le document avant d'écrire dedans
        // Créer un noeud
        _di_IXMLNode Noeud;
        Noeud = Form1->XMLDocument1->CreateNode(WideString("RPG"));
                // Créer un noeud
                Noeud = Form1->XMLDocument1->CreateNode(WideString("Talundra"));
 
 
        //Enregistre le fichier xml
     Form1->XMLDocument1->SaveToFile(ExtractFilePath(Application->ExeName)+"\\TestXml.xml");
 
        //Vider un objet TXMLDocument
        Form1->XMLDocument1->XML->Clear();
 
}
Je serais assez content si je pouvais avoir un peu d'aide.
Merci