Discussion :

[arkhamon]

Bonjour à tous,

je suis sous XE2, j'ai un objet TXmlDocument qui contient ce fichier XML :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
<Personnage>
 <Equipement>
...
  </Equipement>
</Personnage>

J'ajoute un node à la racine avec

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
RacinePerso := XMLPersonnage.DocumentElement;
RacinePerso.AddChild('DonneesCalculee');
XMLPersonnage.SaveToXML();

Et j'obtiens le résultat suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
</Armes>
  </Equipement>
  <DonneesCalculee/></Personnage>

Genre il manque un retour charriot entre <DonneesCalculee/> et </Personnage>

Je fais comment pour avoir ce truc ? Avant j'utilisais une ancienne librairie "NativeXml" qui offrait une propriété "XfReadable" afin de pallier ça? Des idées ?

Merci.

[Papy214]

ça ne fonctionne pas en utilisant NodeIndentStr et et l'option doNodeAutoIndent ??

[arkhamon]

ben déjà ces deux trucs ont pas l'air de faire partie soit de XMLDocument ni de IXmlNode...
J'ai bien trouve un "FormatXMLData" mais je trouve pas comment l'utiliser...

[arkhamon]

oops j'avais pas bien lu. Ca doit être la fatigue... Je cherchais dans les propriétés et pas dans les constantes.

Bon je progresse :
La fin de mon fichier de départ :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
		</Armes>
	</Equipement>    
</Personnage>

Le code Delphi :

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
Procedure TOPersonnage.CalculerPErsonnage;
Var nodecalcul : IXmlNode;
Begin
  XMLPersonnage.Options :=  [doNodeAutoIndent];
  XMLPersonnage.NodeIndentStr := '    ';
  nodecalcul := RacinePerso.AddChild('DonneesCalculee');
  with nodecalcul do
    begin
      with AddChild('Test1') do
        begin
          addchild('autre1');
          AddChild('Autre2');
          Attributes['attr'] := 'attribut';
        end;
      AddChild('Test2');
    end;
End;

Et le résultat final :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
	</Equipement>    <DonneesCalculee>
        <Test1 attr="attribut">
            <autre1/>
            <Autre2/>
        </Test1>
        <Test2/>
    </DonneesCalculee>
</Personnage>

Il reste encore un hiatus au niveau du premier <DonneesCalculee>. PAr contre le </DonneesCalculee> lui est bien indenté...
JE vais essayer de setter Options avant la lecture du fichier on sait jamais...

[arkhamon]

Bon j'ai essayé de mettre le setting des options entre la création du XMLDocument et le loadfromfile, mais rien n'y fait : le premier node créé est toujours mal indenté...

[Papy214]

XMLPersonnage est le IXMLDocument je suppose ?
Tu crées un fichier xml de toutes pièces ou tu modifies un existant ?
Si tu le crée, il faut définir des options au moment de la création, avant le active := True;