Question

我使用直播xml结构，我应该检查收到的xml数据，希望选择哪种方式，问题是xml流是多级的，如下图所示，所有我测试坚持第一阶段

服务器响应xml：

<?xml version='1.0' encoding='UTF-8'?>
<stream:stream xmlns:stream="http://etherx.jabber.org/streams" xmlns="jabber:client" from="messenger.tashbik.com" id="40d07647" xml:lang="en" version="1.0">

<stream:features>
<starttls xmlns="urn:ietf:params:xml:ns:xmpp-tls"></starttls>
<mechanisms xmlns="urn:ietf:params:xml:ns:xmpp-sasl">
<mechanism>DIGEST-MD5</mechanism>
<mechanism>PLAIN</mechanism>
<mechanism>CRAM-MD5</mechanism>
</mechanisms>

<compression xmlns="http://jabber.org/features/compress">
<method>zlib</method>
</compression>

<auth xmlns="http://jabber.org/features/iq-auth"/>
<register xmlns="http://jabber.org/features/iq-register"/>
</stream:features>

如何从上到下检查所有xml流并访问我想要的任何级别？例如，我想访问流：功能级别以检查可用的期货，我也想跳转到压缩级别进行检查。

我使用NativeXML 4.04

Answer 1

如何访问特定节点的子节点列表？

列出特定节点的子节点的方法有很多种。最容易看到的是通过路径查找节点并遍历Containers索引属性。在以下示例代码中，您可以看到如何从/stream:stream/stream:features节点路径迭代所有节点：

uses
  NativeXml;

procedure TForm1.Button1Click(Sender: TObject);
var
  I: Integer;
  Node: TXMLNode;
  NativeXML: TNativeXML;
begin
  NativeXML := TNativeXML.Create(nil);
  try
    NativeXML.LoadFromFile('c:\Response.xml');
    if Assigned(NativeXML.Root) then
    begin
      Node := NativeXML.Root.FindNode('/stream:stream/stream:features');
      if Assigned(Node) then
        for I := 0 to Node.ContainerCount - 1 do
          ShowMessage(UTF8ToString(Node.Containers[I].Name));
    end;
  finally
    NativeXML.Free;
  end;
end;

如何按名称获取某个节点的子节点？

在XML节点树中还有不止一种方法可以更深入。当您知道节点名称时，最简单的方法是使用NodeByName函数，该函数返回对子节点的引用，当它在父树的根中找到时，nil找不到它时。在下一个代码示例中，您可以看到如何使用NodeByName函数首先获取compression节点，然后从那里到达method节点并显示其值：

Node := NativeXML.Root.FindNode('/stream:stream/stream:features');
if Assigned(Node) then
begin
  Node := Node.NodeByName('compression');
  if Assigned(Node) then
  begin
    Node := Node.NodeByName('method');
    if Assigned(Node) then
      ShowMessage(UTF8ToString(Node.Value));
  end;
end;

与上一个示例中的节点相同，您也可以获得例如像这样使用直接路径：

if Assigned(NativeXML.Root) then
begin
  Node := NativeXML.Root.FindNode('/stream:stream/stream:features/compression/method');
  if Assigned(Node) then
    ShowMessage(UTF8ToString(Node.Value));
end;

以上选项并不是获取子节点的唯一方法，但它们应该足够至少作为起点。您还没有描述您要对该响应文件执行的操作，因此很难为您提供最佳方法（如果选择其中一个节点迭代或使用路径选择）。

我用于测试的原始XML文件：

<?xml version='1.0' encoding='UTF-8'?>
<stream:stream xmlns:stream="http://etherx.jabber.org/streams" xmlns="jabber:client" from="messenger.tashbik.com" id="40d07647" xml:lang="en" version="1.0">    
<stream:features>
   <starttls xmlns="urn:ietf:params:xml:ns:xmpp-tls"></starttls>
   <mechanisms xmlns="urn:ietf:params:xml:ns:xmpp-sasl">
      <mechanism>DIGEST-MD5</mechanism>
      <mechanism>PLAIN</mechanism>
      <mechanism>CRAM-MD5</mechanism>
   </mechanisms>
   <compression xmlns="http://jabber.org/features/compress">
      <method>zlib</method>
   </compression>
   <auth xmlns="http://jabber.org/features/iq-auth"/>
   <register xmlns="http://jabber.org/features/iq-register"/>
</stream:features>

delphi nativexml多级xml结构

1 个答案: