WebBrowser и Navigate2

← →
ученик) (2003-11-08 02:54) [0]

ДрАсТе уважаемые мастера )) У меня вопрос по компоненте TWebBrowser.Так вот: как мне сделать так чтобы при открытии веб браузера компонентой TWebBrowser в ней сразу открывалась команда?
Я разбирался.. разбирался.. и допер что это делается функцией Navigate2, в свойстве OnBeforeNavigate.Так вот - что написать после этого?: "procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
Headers: OleVariant; var Cancel: WordBool);
begin
WebBrowser1.Navigate2(???????? --- что тут писать чтобы он открыл
мне к примеру страницу 1.htm"

заранее ПасибА )))

← →
Ihor Osov'yak (2003-11-08 03:28) [1]

тебе WebBrowser1BeforeNavigate2 трогать для этого не нужно.

Достаточно просто в своем коде, когда возникнет необходимость загрузить страницу, просто написать WebBrowser1.Navigate2("1.html"), например в каком-то обработчике, того же клика на кнопку..
Только имей ввиду, что процедура Navigate2 выполняется ассинхронно, то есть она только инициализирует загрузку, а загрузка будет идти паралельно с твоим кодом, конечно, если ты не приложишь некоторые усилия, чтобы этому помешать.. По окончании загрузки срабатывает обработчик OnDocumentComplete.. Или можешь проверять WebBrowser1.ReadyState..

В общем, или на delphi.vitpc.com там есть две статьи на эту тему,
Александра Лозовюка для абсолютно начинающих - http://www.delphikingdom.com/helloworld/demowb.htm
и моя, немного подробнее о некоторых ньюансах http://delphi.vitpc.com/mastering/tweb.htm

Начни со статьи Александра..

Также, кажется, начиная с D6 есть пример работы с TWebBrowser в демках..

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