XMLDoc.FileName := 'myfile.xml';
  XMLDoc.Active:=True;

  XMLDoc.DocumentElement.ChildNodes.First.ChildNodes.FindNode('m:properties') ;
  ANode := StartItemNode;
  repeat
    STitle := ANode.ChildNodes['d:DollarSellRate m:type'].Text;

    ANode := ANode.NextSibling;
  until ANode = nil;