急！！！！！！如何使用WebBrowser获取XML文件源代码在线等待

yousp 2003-01-22 02:53:10

我想使用Delphi控制WebBrowser获取XML文件的源代码。

由于IE会将正常的XML文件以可伸缩的方式展现，其实内部是使用了很多HTML代码+JavaScript来控制的。

所以，以下一段很简单的XML文件：

<?xml version="1.0" encoding="gb2312" standalone="yes"?>
<citics_pixie_command>
<result name='InvalidCommand' type='Error' >
<parameter name='Description' type='String' desc='非法指令' value='非法指令'/>
</result>
</citics_pixie_command>

使用Memo.Text := WebBrowser.OleObject.Document.Body.outerHTML;得到的却如下：

<BODY class=st><DIV class=e><SPAN class=b> </SPAN> <SPAN class=m><?</SPAN><SPAN class=pi>xml version="1.0" encoding="gb2312" standalone="yes" </SPAN><SPAN class=m>?></SPAN> </DIV>
<DIV class=e>
<DIV class=c style="MARGIN-LEFT: 1em; TEXT-INDENT: -2em"><A class=b onfocus=h() onclick="return false" href="#">-</A> <SPAN class=m><</SPAN><SPAN class=t>citics_pixie_command</SPAN><SPAN class=m>></SPAN></DIV>
<DIV>
<DIV class=e>
.............省略若干.............
<DIV>
class=t>citics_pixie_command</SPAN><SPAN class=m>></SPAN></DIV></DIV></DIV></BODY>

不知道有什么好的办法？

...全文