Question

易语言超文本链接框如何阻止弹出窗口

就是在超文本连接框里我点开一个网页，可是这个网页是需要新建一个网页打开的，也就是说不能在超文本连接框内打开它，请问怎么才能让它在超文本连接框内打开？谢谢了

Answer 1

不弹出IE窗口打开可以这样子写：
.版本 2
.支持库 HtmlView

.子程序 _超文本浏览框1_即将打开新窗口, 逻辑型

超文本浏览框1.地址 ＝ 超文本浏览框1.状态条文本
返回 (假)
或者下面这个也行：
webbrowser 有个WebBrowser_NewWindow2的事件
.版本 2
.支持库 shdocvw

.子程序 _WebBrowser_NewWindow2, , , 将本事件的“Cancel”参数设为“真”，即可阻止弹出窗口
.参数 ppDisp, 对象, 参考
.参数 Cancel, 逻辑型, 参考

' Cancel ＝ 真
ppDisp ＝ WebBrowser1.GetApplication ()
WebBrowser.可视 ＝ 假
WebBrowser1.可视 ＝ 真
因为超文本浏览框这个组件不完美，存在一些BUG（漏洞）建议去下载其他的WEB支持库。也就是浏览器的支持库。超文本浏览框没啥用。最多用来弄一些小广告。

Answer 2

就是在即将打开新窗口时，使超文本浏览框１打开即将打开的网页，然后阻止新窗口打开就行，以下是源码：.版本 2.支持库 HtmlView
.子程序 _超文本浏览框1_即将打开新窗口, 逻辑型
超文本浏览框1.地址 ＝ 超文本浏览框1.状态条文本返回 (假)

Answer 3

因为超文本浏览框这个组件不完美，存在一些BUG（漏洞）建议楼主去下载其他的WEB支持库。也就是浏览器的支持库。超文本浏览框没啥用。最多用来弄一些小广告！希望采纳！