其实xml解析很快的。很方便的，用superxmlparse

发布时间：2020-12-16 05:41:53 所属栏目：百科来源：网络整理

导读：procedure TForm1.Button1Click(Sender: TObject); var straccept: string; jo: ISuperObject; begin straccept :='xmlURL![CDATA[http://y14572q738.iask.in]]'+ '/URLToUserName![CDATA[gh_ae80c2d464a0]]/ToUserName'+ 'FromUserName![CDATA[oMuCUtyk3BYvx

procedure TForm1.Button1Click(Sender: TObject); var straccept: string; jo: ISuperObject; begin straccept :='<xml><URL><![CDATA[http://y14572q738.iask.in]]>'+ '</URL><ToUserName><![CDATA[gh_ae80c2d464a0]]></ToUserName>'+ '<FromUserName><![CDATA[oMuCUtyk3BYvxWzUQ7ZHsWuP9__Y]]>'+ '</FromUserName><CreateTime>12345</CreateTime><MsgType>'+ '<![CDATA[text]]></MsgType><Content><![CDATA[peixiaobinhaorena]]>'+ '</Content><MsgId>1</MsgId></xml>'; jo := XMLParseString(straccept,true); ShowMessage(jo.S['URL']);

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!