помогите пожалуйсто в создании браузера!

[П@шец]

Привет у меня такая проблема: вот код он открывает страницу в браузере в новом окне (в понели задач оно не появляется и сворачивается возле меню "пуск", но не в панели задач) , но если я закрою старое, то новое тоже закроется!!!!! почему? как исправить этот код => так чтобы ссылка при нажатии "открыть в новом окне" открывалась в новом окне TabbedNotebook1 (ну и соответственно надо "положить" на TabbedNotebook1 Webbrawser1 чтобы в нем откравалось ссылка) ИЛИ МОЖЕТ КАКОЙ ДРУГОЙ ВАРИАНТ ПОСОВЕТУЕТЕ????

вот код

procedure TForm1.WebBrowser1NewWindow2(Sender : TObject;
var ppDisp: IDispatch; var Cancel: WordBool);
var
NewWindow: TForm1;
begin
try NewWindow := TForm1.Create(self);
NewWindow.Show;
ppDisp := NewWindow.Webbrowser2.DefaultDispat ch;
except;
end;
end;

[mihali4]

вот код

procedure TForm1.WebBrowser1NewWindow2(Sender : TObject;
var ppDisp: IDispatch; var Cancel: WordBool);
var
NewWindow: TForm1;
begin
try NewWindow := TForm1.Create(self);
NewWindow.Show;
ppDisp := NewWindow.Webbrowser2.DefaultDispat ch;
except;
end;
end;

Это что за "чудеса", позвольте спросить? Кто вас так научил?

[П@шец]

Сообщение от mihali4

Это что за "чудеса", позвольте спросить? Кто вас так научил?

По-этому я и спарасил как можно сделать, потому, что незнаю как. А код в исходниках скачал на сайте http://ishodniki.ru/

[Virtson]

объявляйте глобальную переменную .. а лучше массив

[mihali4]

var
NewWindow: TForm1;
begin
try NewWindow := TForm1.Create(self);

Смените на

var
NewWindow: TForm;
begin
try NewWindow := TForm.Create(self);