怎么在 TWebBrowser 中模拟点击超链接

如何在 TWebBrowser 中模拟点击超链接
如何在   TWebBrowser   中模拟点击超链接

[解决办法]
for I:=0 to ((WebBrowser1.document as Ihtmldocument2).links.length-1 do Begin
((WebBrowser1.document as Ihtmldocument2).links.item(I, I) As IHTMLElement).Click
end;