« XPath (xmldoc) » : différence entre les versions

De Wiki1000
Aucun résumé des modifications
Aucun résumé des modifications
Ligne 54 : Ligne 54 :
end;
end;
</source>
</source>
'''Utilisation comme un itérateur de noeuds'''
<source lang='delphi'>
procedure foo(doc:TxmlDocument);
var elt:TxmlItem; idx:Integer; node:TxmlNode;
begin
  doc := TxmlDocument.Create(nil);
  doc.loadFromFile('c:\test.xml');
  //
  foreach node in doc.XPath('//C') do
  showMessage(node.QName);
end;
</source>


Ces exemples retournent tous les éléments "C" du document
Ces exemples retournent tous les éléments "C" du document

Version du 10 août 2009 à 17:23

<source lang='delphi'>function XPath(const iExpression:string):TxmlPath;</source>

Cette fonction exécute une expression XPath et retourne un résultat pouvant être un ensemble de noeud, une valeur numérique, une valeur chaîne ou une valeur logique.

Result Un objet TxmlPath contenant le résultat.
iExpression Expression XPath a exécuter.

Exemple:

Utilisation du résultat comme un ensemble d'éléments. <source lang='delphi'> procedure foo(doc:TxmlDocument); var xpt:TxmlPath; idx:Integer; elt:TxmlItem; begin

 doc := TxmlDocument.Create(nil);
 doc.loadFromFile('c:\test.xml');
 //
 xpt := doc.xPath('//C');
 for idx:=0 to xpt.Count-1 do
  showMessage(xpt.Items[idx].GetAttribute('Id',));

end; </source>

Utilisation du résultat comme un itérateur d'élément. <source lang='delphi'> procedure foo(doc:TxmlDocument); var elt:TxmlItem; idx:Integer; elt:TxmlItem; begin

 doc := TxmlDocument.Create(nil);
 doc.loadFromFile('c:\test.xml');
 //
 foreach elt in doc.XPath('//C') do
  showMessage(xpt.Items[idx].GetAttribute('Id',));

end; </source>

Utilisation des noeuds du résultat. <source lang='delphi'> procedure foo(doc:TxmlDocument); var xpt:TxmlPath; idx:Integer; elt:TxmlItem; begin

 doc := TxmlDocument.Create(nil);
 doc.loadFromFile('c:\test.xml');
 //
 xpt := doc.xPath('//C');
 for idx:=0 to xpt.Count-1 do
  showMessage(xpt.Nodes[idx].QName);

end; </source>

Utilisation comme un itérateur de noeuds <source lang='delphi'> procedure foo(doc:TxmlDocument); var elt:TxmlItem; idx:Integer; node:TxmlNode; begin

 doc := TxmlDocument.Create(nil);
 doc.loadFromFile('c:\test.xml');
 //
 foreach node in doc.XPath('//C') do
  showMessage(node.QName);

end; </source>


Ces exemples retournent tous les éléments "C" du document

<A>
 <B>
  <C id="11"/>
  <C id="12"/>
  <C id="13"/>
 </B>
 <B>
  <C id="21"/>
  <C id="22"/>
  <C id="23"/>
 </B>
</A>

Les six éléments C sont retournés.

Voir aussi:


{{#if:Documents XML (tech)|

{{#if:Documents XML (tech)|— Documents XML (tech) |}} — Développement DSM

|

{{#if:|— [[{{{1}}}]] |}} — Développement DSM

}}