如何通过WebBrowser-Control(ActiveX InternetExplorer)获取页面源代码?

use*_*002 6 delphi webbrowser-control

如何通过WebBrowser Control(ActiveX InternetExplorer)获取页面的源代码?

我有一个xml文档"foo.xml".

var
 Web: TWebBrowser;
begin
 ...
 Web.Navigate("foo.xml");
 // How can I get source code thru WebBrower control<----
 ...
end;
Run Code Online (Sandbox Code Playgroud)

Tob*_*len 1

我以为这很容易,但似乎它可能已经被忘记了。不过,您可以使用 TidHTTP 控件轻松完成此操作。

MyPage := IdHTTP1.Get('www.google.com');
Run Code Online (Sandbox Code Playgroud)

我知道这不是你想要的,但可能会有所帮助。