在获取网页源码时，webBrowser的使用问题，求助谢谢！

Question

function TFrmMain.GetSources1(FWB: TEmbeddedWB): String;
var
  iall : IHTMLElement;
begin
 if Assigned(FWB.Document) then
 begin
   iall := (FWB.Document AS IHTMLDocument2).body;
   while iall.parentElement <> nil do
   begin
     iall := iall.parentElement;
   end;
   result := iall.outerHTML;
 end;
end;

Answer 1

TEmbeddedWB 这个是第三方控件么？是不是用这个来获取网页内容？谢谢·~

Answer 2

都什么年代了 还用 webBrowser 
1  速度慢 
2 mshtml有内存泄露 改用indy  idhttp吧

Answer 3

把TEmbeddedWB直接修改为twebbrowser类型即可