如何下载网页源文件？谢谢各位啦！

Question

一个DELPHI的浏览器，但无法下载网页源文件，安装的库全都是出错的，这个问题如何解决？希望各位大哥哥，大姐姐传授一点技能。谢谢啦！

Answer 1

我明白楼主的意思，就是用delphi做了个浏览器，想要IE中：查看/源文件 的功能，是吧？楼主！可惜我不会呀！！？
帮你顶一下吧！

Answer 2

提取已知文件名的页面源码
var
  HTMLDocument: IHTMLDocument2;
  PersistFile: IPersistFile;
begin
  ...
  HTMLDocument := WebBrowser1.Document as IHTMLDocument2;
  Persist := HTMLDocument as IPersistFile;
  Persist.Save(StringToOleStr('test.htm'), True);  while HTMLDocument.readyState <> 'complete' do
    Application.ProcessMessages;
 ...
end;
直接从TWebBrowser得到网页源码
Memo1.Lines.Add(IHtmlDocument2(WebBrowser1.Document).Body.OuterHtml);

Answer 3

有没有具体一点的。谢谢啦！再把我的意思具体说明一次：用DELPHI编写一个浏览器，在此浏览器上用一个控件来控制下载源代码。

Answer 4

很简单的。
用NMHTTP，在D6中有的控件。
用它的get(网址),然后在它的Body属性中全是网页源代码。
慢慢看吧。