3

最新の OmniXML スナップショットを使用して処理している、より大きな XML ファイルの一部として、次の XML スニペットを取得しました。

<OrderRequestHeader>
<!-- snipped XML bits here -->
<ShipTo>                                                        
    <Address addressID="">                                      
        <Name xml:lang="en">SOME COMPANY</Name>        
        <PostalAddress name="default">                          
            <DeliverTo>John Doe</DeliverTo>                  
            <Street>123 Any St</Street>                  
            <City>Nowhere</City>                              
            <State>AK</State>                                   
            <PostalCode>99999</PostalCode>                      
            <Country isoCountryCode="US">United States</Country>
        </PostalAddress>                                        
        <Email/>                                                
        <Phone>                                                 
            <TelephoneNumber>                                   
                <CountryCode isoCountryCode=""/>                
                <AreaOrCityCode/>                               
                <Number></Number>                               
            </TelephoneNumber>                                  
        </Phone>                                                
    </Address>                                                  
</ShipTo>
<!-- more XML stuff follows -->
</OrderRequestHeader>

現在、ノードを指す変数を取得しており、<ShipTo>ノードの内容を選択したいと考えてい<Name>ます。私は次のコードを使用していますが、Node2近づいていNilます...

procedure ProcessXML;
var
    Node1, Node2: IXMLNode;

begin
    Node1 := FindNode(OrderHeader, 'ShipTo');
    // the above is working.  Node points to the <ShipTo> node
    Node2 := SelectNode(Node1, 'Name');
    // the above line doesn't work.  Node2 is Nil
end;

なぜNode2 Nilですか？のヘルプによると、OmniXMLUtils.pasはSelectNode複数レベル下の単一ノードを選択する可能性があります。確かに<Name>ノードがあります。経由でノードを見つけようとしてもXPathSelect(Node1, 'Name');、空のリストが返されます。OmniXML の使い方が間違っているのでしょうか? <Name>最初にノードを選択せず​​にノードに到達することは可能<Address>ですか?

4

2 に答える 2

2

私は自分が間違っていることを理解しました。必要な孫ノードの名前だけでなく、相対パス全体を指定する必要があります。

ProcessXML上記の例から、次のNode2ように入力する必要があります。

Node2 := SelectNode(Node, 'Address/Name');

XPathを使用して、私はそれを経由して見つける必要がありますXPathSelect(Node, 'Address/Name');

于 2011-04-01T17:17:45.887 に答える
2

SelectNodeダブルスラッシュ文字を前に置くと、正常に動作します。

var
  FXMLDocument: IXMLDocument;

// Somewhere along the line
  FXMLDocument := CreateXMLDocument
  XMLLoadFromFile(FXMLDocument, 'WhateverFile.xml');
  // or XMLLoadFromAnsiString(FXMLDocument, SomeStringVar);


var
  QryNode, Node: IXMLNode;
begin
  QryNode := FXMLDocument.DocumentElement;
  Node := SelectNode(QryNode, 'ShipTo');
  if Assigned(Node) then
  begin
    QryNode := SelectNode(Node, '//Name');
    if Assigned(QryNode) then
      ShowMessage('ShipTo Name is ' + QryNode.FirstChild.Text)
    else
      ShowMessage('Name not found');
  end;
end;

必要に応じて、XPath も問題なく動作します。

implementation

var
  FXMLDocument: IXMLDocument;

// Somewhere along the line
  FXMLDocument := CreateXMLDocument
  XMLLoadFromFile(FXMLDocument, 'WhateverFile.xml');
  // or XMLLoadFromAnsiString(FXMLDocument, SomeStringVar);

function GetShipTo: string;
var
  QryNode: IXMLNode;
  Node: IXMLNode;
  NodeList: IXMLNodeList;
begin
  Result := '';
  QryNode := FXMLDocument.DocumentElement;  

  // The following also work:
  // '//Address/Name'
  // '//Name'
  NodeList := XPathSelect(QryNode, '//ShipTo/Address/Name');
  if NodeList.Length > 0 then
    QryNode := NodeList.Item[0]
  else
    QryNode := nil;
  if Assigned(QryNode) then
    Result := QryNode.FirstChild.Text; // Now has 'SOME COMPANY'
end;
于 2011-04-01T14:40:42.743 に答える