TWebBrowser控件与MSHTML库连接

webbrowser控件
配置与ie的配置相同

方法一 使用document属性得到 document 层
webbrowser.document:idispatch //是idispatch接口

var doc: ihtmldocument2;
begin
...
try //注意:使用 as 时必须加try...except...end保护
doc:= (webbrowser1.document) as ihtmldocument2;
if assigned(doc) then begin //判断是否为空
...//具体操作
end;
except
...
end;
...
end;

方法二 使用queryinte易做图ce接口得到 window 层
webbrowser.queryinte易做图ce(iid_ihtmlwindow2, out win: ihtmlwindow2);//返回webbrowser控件的ihtmlwindow2接口

var win: ihtmlwindow2;
begin
...
try
webbrowser1.queryinte易做图ce(iid_ihtmlwindow2, win);
if assigned(win) then begin //判断是否为空
...//具体操作
end;
except
...
end;
...
end;