首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

怎么在TWebBrowser中强制在新窗口打开链接

2012-03-12 
如何在TWebBrowser中强制在新窗口打开链接?在用TWebBrowser编程中的问题:有些页面的超链接点击后默认是在

如何在TWebBrowser中强制在新窗口打开链接?
在用TWebBrowser编程中的问题:
有些页面的超链接点击后默认是在本窗口打开的,要想在新窗口打开必须“右键-> 在新窗口打开”,请问怎么强制让这样的链接左键点击后在新窗口打开?
我发现MyIE2等就有这样的功能,选择这个选项后点击所有的链接都会在新窗口打开网页。

[解决办法]
一、拦截link上的onclick事件,强行打开新窗口
二、在装入html时,强行对所有 <a> 标签加上target=blank属性
[解决办法]
楼上的方法可行
[解决办法]
帮顶
[解决办法]
在webbrowser中有一个事件叫OnNewWindowsClick你实现该事件,在里面返回一个新的webbrowser对象的IDispatch给它就是一个新窗口了。
[解决办法]
OnNewWindowsClick
[解决办法]

Delphi(Pascal) code
   // Set OnNewWindow Event   FBrowser.OnNewWindow2 := OnIENewWindow;procedure TfrmBizMain.OnIENewWindow(ASender: TObject; var ppDisp: IDispatch;  var Cancel: WordBool);var  FBrowser: TIEBrowser;begin  if ASender is TIEBrowser then  begin    Cancel := not actNewTab.Execute; // Create A New WebBrowser    if not Cancel then    begin      FBrowser := GetBrowser;// Get The Browser just Created      if Assigned(FBrowser) then        ppDisp := FBrowser.Application;    end;  end;end; 

热点排行