Twebbrowser1.OleObject.document的问题(100分)

Twebbrowser1在打开一个html文件之后,执行 showmessage(w.OleObject.document.links(0).href);
出错,信息是 Project Project1.exe raseed exception class EOleSysError with message '尚未完成'. 请大虾指教!

遍历links

增加uses mshtml
var
Document : IHtmlDocument2;
Link : IHTMLElement;
StrLinks : string;
i : integer;

begin
Document := WebBrowser1.Document as IHTMlDocument2;
for i := 0 to Document.Links.Length - 1 do
begin
Link := Document.Links.Item(i, 0) as IHTMLElement;
StrLinks := Link.ToString + #13#10;
ShowMessage(StrLinks);
end;
end;

运行成功,thanks

不过在delphi5的帮助里面居然找不到关键字"mshtml"和"IHtmlDocument2","IHTMLElement",delphi的错还是我的错?

使用webbrowser控件内存会越来越少吗？为何我会？
有何解决方案？

接受答案了.