用Delphi获取xml里的body

您可以使用Delphi的XML文档组件来获取XML文件中的body元素。以下是一个示例代码，演示如何使用TXMLDocument组件来加载XML文件，并使用XPath表达式来选择body元素：

uses
  XMLIntf, XMLDoc, XMLDom, xmldom, MSXML;

var
  XMLDoc: TXMLDocument;
  XMLNode: IXMLNode;
  BodyNode: IXMLNode;
  XPath: string;
begin
  // 加载XML文件
  XMLDoc := TXMLDocument.Create(nil);
  XMLDoc.LoadFromFile('your_xml_file.xml');

  // 选择body元素
  XPath := '/soap:Envelope/soap:Body'; // 假设body元素在soap:Envelope/soap:Body路径下
  XMLNode := XMLDoc.DocumentElement.SelectNode(XPath, TNamespaceManager.Create(XMLDoc));
  if Assigned(XMLNode) then
  begin
    BodyNode := XMLNode.ChildNodes.First;
    // 处理body元素
    // ...
  end;

  XMLDoc.Free;
end;

请注意，此示例使用了MSXML解析器，因此您需要在代码中添加MSXML单元。如果您希望使用其他XML解析器，可以相应地更改代码。另外，您还需要根据您的XML文件路径和命名空间调整XPath表达式。