TwebBrowser

← →
kor@l © (2004-01-23 20:49) [0]

Когда щелкая по ссылке я хочу чтобы новая страница открывалась
в новом окне моей програмы а не в IE или в ещё чём нибудь.
Please help!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

← →
Ломброзо © (2004-01-24 00:39) [1]

вот Вам статья ныне покойного, штудируйте на досуге:

lombrozo.pochta.ru/zip/Ready.zip
lombrozo.pochta.ru/zip/CGI.pas

← →
nikkie © (2004-01-24 01:14) [2]

положить на форму и спрятать еще один WebBrowser, обработав у него OnBeforeNavigate. у основного WebBrowser обработать OnNewWindow.

← →
Скив (2004-01-26 08:44) [3]

nikkie
а вот тут чуть подробнее.

← →
easy © (2004-01-26 11:41) [4]

procedure TForm1.WebBrowser1NewWindow2(Sender: TObject; var ppDisp: IDispatch; var Cancel: WordBool); begin ppDisp:=form2.WebBrowser1.Application; form2.Show; end;

← →
Скив (2004-01-26 11:57) [5]

Спасибо!

>easy
использование WebBrowser1.Application будет приводить к утечке памяти. ну и поскольку в хелпе по NewWindow2 написано
ppDisp [out] Address of an interface pointer that, optionally, receives the IDispatch interface pointer of a new WebBrowser or InternetExplorer object.
то более логично использовать WebBrowser1.DefaultInterface.

TwebBrowser Найти похожие ветки