_XmlGetNodes

(    hDoc        : Longint,
     hParentNode : Longint,
     Path        : StringZ,
 dim F           : File) : Byte

Vrátí stream F s kolekcí handlů na Xml nody nalezené v documentu hDoc dle cesty Path od nodu hParentNode. Bude-li cesta Path napsána od kořene Xml dokumentu, pište hParentNode=0 .

Stream F musí být otevřen.

Jestliže vše dobře dopadne, vrací funkce true.

Příklad:

procedure XmlTest
  dim hDoc      : Longint;
  dim hRootNode : Longint;
  dim hZamNode  : Longint;
  dim hNode     : Longint;
  dim F         : File;
  dim nIdx      : Longint;
  dim Value     : StringZ;
  
  _XmlCreateDoc(hDoc, "<ROOT />");
  hRootNode := _XmlGetNode(hDoc, 0, "ROOT");
  hZamNode  := _XmlAddElementNode(hDoc,hRootNode,"Zaměstnanci","","");
  
  _XmlAddElementNode(hDoc,hZamNode,"Zaměstnanec","","Novák Karel");
  _XmlAddElementNode(hDoc,hZamNode,"Zaměstnanec","","Horák Pavel");
  _XmlAddElementNode(hDoc,hZamNode,"Zaměstnanec","","Jandák Milan");
  
  SRewrite(F,"",true);
  _XmlGetNodes(hDoc, 0, "ROOT/Zaměstnanci/Zaměstnanec", F);
  if _SFirst(F,nIdx) then
    repeat
      hNode := _SGet(F, nIdx);
      _XmlGetNodeValue(hNode, Value);
      Trace(Value);
    until _SNext(F,nIdx)=false;
  endif
  XmlReleaseDoc(hDoc);
endproc

Podívejte se na: XML dokumenty

Příklady