求助 webbrowser的问题(100分)

我在程序里用到了webbrowser

但是它每次弹出新窗口都是用ie打开的。。
我的系统默认浏览器是GreenBrowser

如何编写程序使webbrowser的弹出新窗口在系统默认的浏览器即greenbrowser中打开捏

我也有這問題...關注...
我想改應該改一下注刪表是可以的...但不知如何下手!!

procedure TfrmBrowse.WebNewWindow2(Sender: TObject;
var ppDisp: IDispatch; var Cancel: WordBool);
var
NewWindow: TfrmBrowse;
begin
NewWindow := TfrmBrowse.Create(self);
NewWindow.Show;
ppDisp := NewWindow.Web.DefaultDispatch;
end;

procedure TfrmBrowse.WebNavigateComplete2(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
begin
if CurDispatch = nil then
CurDispatch := pDisp;
SetFree;
end;

procedure TfrmBrowse.WebDocumentComplete(Sender: TObject;
const pDisp: IDispatch; var URL: OleVariant);
begin
if (pDisp = CurDispatch) then begin
Beep;
CurDispatch := nil;
end;
end;

编译出错了。。
Undeclared identifier:'Web'

不知道哪里出错了

唉 你没看懂我的意思。

我是要用系统默认的浏览器打开新窗口
不是用ie 也不是我做的那窗口