转义

No. 文字表記10進表記16進表記文字
Comment001""""""
quotation mark = APL quote002&&&"&"
ampersand003&lt;&#60;&#x3C;"<"
less-than sign004&gt;&#62;&#x3E;">"
greater-than sign005&nbsp;&#160;&#xA0;" "
no-break space = non-breaking space

function ConvertESC(Src: string):string;//将转义字符转换成一般字符

begin
  Result := '';


  Src := StringReplace(Src,'&quot;','"',[rfReplaceAll]);
  Src := StringReplace(Src,'&amp;','&',[rfReplaceAll]);
  Src := StringReplace(Src,'&lt;','<',[rfReplaceAll]);
  Src := StringReplace(Src,'&gt;','>',[rfReplaceAll]);
  Src := StringReplace(Src,'&nbsp;',' ',[rfReplaceAll]);

  Result := Src;

end;

先用这个笨办法来转义成正常代码

&lt;Response&gt;&lt;RspCode&gt;0&lt;/RspCode&gt;&lt;RspDesc&gt;Processing the request succeeded!&lt;/RspDesc&gt;&lt;/Response&gt;&lt;SvcCont&gt;&lt;![CDATA[&lt;?xml version="1.0" encoding="UTF-8"?&gt;
&lt;WBQryAsynDealResultRsp&gt;&lt;ERRCODE&gt;1001&lt;/ERRCODE&gt;&lt;ERRINFO&gt;未找到任务&lt;/ERRINFO&gt;

<Response><RspCode>0</RspCode><RspDesc>Processing the request succeeded!</RspDesc></Response><SvcCont><![CDATA[<?xml version="1.0" encoding="UTF-8"?>
<WBQryAsynDealResultRsp><ERRCODE>1001</ERRCODE><ERRINFO>未找到任务</ERRINFO>