Discussion :

[user 56gt8]

Bonjour , je recherche de l'aide pour représenter un array dans un document xml.L'array prend trop de place en mémoire, le xml semble être une solution.

j'ai comme variable: Attributes: array[0..5000] of array [0..500] of array [0..250] of boolean.

Il faudrait , à la création de l'apps, automatiser la création du document via 3 boucles itératives imbriquées.
Voilà , je recherche des exemples pour celà.Je précise que je connais pas du tout les fonctionalités XML , les classes, les méthodes etc.

[ShaiLeTroll]

Pour le XML, voir le TXMLDocument

sinon, pour la structure, tu peux la voir totalement à plat

Code :

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

1
2
3
4
5
<TABLEAU X=5001 Y=501 Z=251>
  <ITEM X=0 Y=0 Z=0 VALUE=TRUE/>
  <ITEM X=0 Y=0 Z=1 VALUE=FALSE/>
  ...
</TABLEAU>

attention 0..5000 c'est 5001 item !
bon, je ne suis pas très à l'aise non plus avec le XMLDocument, que je trouve compliqué dans le parcours des noeuds, je ne retrouve un des mes codes ou j'avais trouvé une forme plus simple

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
      for i := 0 to XML.DocumentElement.ChildNodes.Count - 1 do
      begin
         ANode := xmlTransformation.node.ChildNodes.First.ChildNodes[i];
         if ANode.NodeName = 'TABLEAU' then
         begin
            X := ANode.Attributes['X']            
            Y := ANode.Attributes['Y'] 
            Z := ANode.Attributes['Z']
            SelLength(Tableau, X);
            for iX := 0 to X-1 do
            begin
              SelLength(Tableau[iX], Y);
              for iY := 0 to Y-1 do
              begin
                SelLength(Tableau[iX, iY], Z);
              end;
            end;
         end;
      end;

pour remplir ton tableau, c'est un truc du genre

Code :

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

1
2
3
4
5
6
7
8
9
10
11
      for i := 0 to ANode.ChildNodes.Count - 1 do
      begin
         AChildNode := ANode.ChildNodes.First.ChildNodes[i];
         if AChildNode.NodeName = 'ITEM' then
         begin
            X := AChildNode.Attributes['X']            
            Y := AChildNode.Attributes['Y'] 
            Z := AChildNode.Attributes['Z']
            Tableau[X, Y, Z] := StrToBool(AChildNode.Attributes['VALUE']);
         end;
      end;

[user 56gt8]

Merci , je vais essayer d'adapter ca une fois familiarisé avec TXMldoc.
En fait dans mon cas X représenterait un noeud d'un TreeView,
Y l'indice des items d'une listview et Z les attributs des items de la liste.
Si quelqu'un voit une meilleurs solution que le xml je suis preneur.
Comme il s'agit d'un logiciel d'indexation il faut que les données puissent être facilement retrouvées/recherchées.