delphi 获取网页源代码

//获取网页源代码

var

  s: string;

begin

  s := WebBrowser1.OleObject.document.body.innerHTML; //body内的所有代码

  s := WebBrowser1.OleObject.document.body.outerHTML; //body内的所有代码, 包含body标签

  s := WebBrowser1.OleObject.document.documentElement.innerHTML; //html内的所有代码

end;

来自为知笔记(Wiz)

转载于:https://www.cnblogs.com/xe2011/p/3884430.html