用WebBrowser开发多页浏览器 遇到是showModalDialog类型的网页后，不能够打开 ( 积分: 50 )

用WebBrowser开发多页浏览器 遇到是showModalDialog类型的网页后，不能够打开，
如何辨别是showModalDialog类型的新开网页，然后不在新页中打开呢？
在OnNewWindow2我写了如下代码 ，能够在这里判断，是showModalDialog类型的就不执行下面的代码
var
WB: TEmbeddedWB;
begin
WB := NewPage;
if WB <> nil then
ppDisp := WB.Application;
end;