xml - omn​​i xml 、xmlファイルを読み取るための簡単な現在の例はありますか?

Question

Omni Xml パッケージの読みやすい使用例を探しています。

ドキュメントは現在、読み込みと書き込みの 2 つの例であり、読み取りや反復については何もありません。

繰り返し可能なプロパティの例である、簡単な読み取り Xml を提供していただけますか

そのような

<root>
<value p1=1></value>
<value p1=2 p2='32432'/>
<value p1=3 p3='fdsf'><other></other></value>
</root>

すべての値を反復処理して p1 プロパティを取得する方法。

Answer 1

uses
  OmniXML,
  OmniXMLUtils;

var
  node : IXMLNode;
  other: IXMLNode;
  xml  : IXMLDocument;
begin
  xml := CreateXMLDoc;
  if XMLLoadFromFile(xml, 'fname.xml') then begin // 3 more notes
    for node in XMLEnumNodes(xml,'/root/value') do begin
      Writeln(GetNodeAttrStr(node, 'p1', ''), ';', GetNodeAttrStr(node, 'p2', ''), ';', 
        GetNodeAttrStr(node, 'p3', ''));
      other := SelectNode(node, 'other');
    end;
  end;
end;

警告：テストされていません。ブラウザで記述されています。