Delphi WebBrowser 嵌入网页的时候，如果有弹出的小窗口限制了大小等问题！(100)

Delphi WebBrowser 嵌入网页的时候，如果有弹出的小窗口限制了大小 比如window.open('Modify.php?Type=MobPhone', '号码修改', 'top=300, left=300, height=80, width=300, toolbar=no, menubar=no, resizable=no, location=no, status=no')" class="ButtonBg02_Blue" />Delphi WebBrowser 弹出窗口的时候，第一次showmodal不能显示。第二次showmodal的时候可以。WebBrowser，如果处理可以避免

WebBrowser 如何 捕获 window.open 弹出框的大小？