TWebBrowser 获取html文件中Frame文档的方法

看代码:

var  document: IHTMLDocument2;
  ole_index: OleVariant;
  frame_dispatch: IDispatch;
  frame_win: IHTMLWindow2;
  frame_doc: IHTMLDocument2;
begin
//获取主文档  
document := WebBrowser1.Document as IHTMLDocument2;
if not Assigned(document) then Exit; //获取第二个frame,为IDIspatch类型 ole_index := 1; frame_dispatch := document.Frames.Item(ole_index);
//如果不为空,转换IDispatch为IHTMLWindow2,获取document
if frame_dispatch <> nil then begin frame_win := frame_dispatch as IHTMLWindow2; frame_doc := frame_win.document;
end;

接下来就可以根据frame_doc进行各种处理了。关键就是通过IDispatch中转类型。

发表回复

您的电子邮箱地址不会被公开。 必填项已用 * 标注

此站点使用Akismet来减少垃圾评论。了解我们如何处理您的评论数据