delphi中我自己做了一个WEB浏览器,但是点击一些链接打开的新窗口总是IE的,我应该

添加webbroser的onNewWindow2的实践
procedure TFmMain.WebBrowser1NewWindow2(Sender: TObject;
var ppDisp: IDispatch; var Cancel: WordBool);
var
str: string;
begin
//禁止弹页面
Cancel:= true;
try
str:= WebBrowser1.oleObject.document.ActiveElement.GetAttribute('href');
if str <> '' then
begin
try
WebBrowser1.Navigate(str);
except
showmessage('暂时无法打开此站点!');
end;
end;
except
end;
end;

代码没写全，参考一下其他简单一点的浏览器的源码吧，在一些事件中还需要写代码的

点击链接的时候是打开默认浏览器的，你需要将自己做的浏览器设定为默认浏览器，可设置自动检测也可以通过一些系统工具软件设置（WINDOWS里的管理工具中好像也能设，忘了在哪设置了）

把IE浏览器里面的 默认浏览器关闭就行！！