方法一:
通过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);
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024