TWebBrowser备忘

TWebBrowser的流程是这样的:

OnBeforeNavigate2 <--开始链接时会触发此事件
OnNavigateComplete2 <--成功的链接到此网页(以后才会有下面的事件)
OnDownloadBegin <--开始下载
OnDownloadComplete <--下载结束
OnDocumentComplete <--页面下载完毕

对于每个HTML页面,顺序都是如此.如果是Frame或IFrame的文件都会当成HTML页面处理.也就是说如果一个页面中有3个IFrame,那么总共会触发4次BeforeNavigate2事件.

对于每个连接且需要显示出来的二进制文件(如*.gif,*.bmp,*.jpg...)都会触发一个DownloadBegin和DownloadComplete事件

 

Delphi带的TWebBrowser在Borland\Delphi7\Bin\dclib70.bpl里面，最好重新从Microsoft Internet Controls（C:\WINDOWS\system32\shdocvw.dll) 再Import ActiveX一下，使接口完善一点。

 

1. 在引用单元里面最好加上

initialization
  OleInitialize(nil);
finalization
try
    OleUninitialize;
except
end;

 

2.  在NewWindow接口里面，设置了默认的left、top、width、height，也可以js使用Window.open来设置弹出窗体的大小和高度

例如：

  <div id="d_zdy" onclick="window.open('http://www.windin.com','cccc','resizable=no,menubar=no,status=no,scrollbars=no,top=200,left=200,toolbar=no,width=320,height=260')" class="imgHomepage" href="javascript://">                     &nbsp;</div>