Question

delphi中 webbrowser如何获取当前打开页面的URL

Answer 1

方法一:
通过IWEBBROWSER接口取:
var
aintf: IWebBrowser;
begin
aintf := WebBrowser1.Application as IWebBrowser;
ShowMessage( aintf.LocationURL);

方法二:
通过IHtmlDocument2接口取:
var
aintf: IHTMLDocument2;
begin
aintf := WebBrowser1.Document as IHTMLDocument2;
ShowMessage( aintf.url);