Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.01.09;
Скачать: CL | DM;

Вниз

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 в демках..



Страницы: 1 вся ветка

Текущий архив: 2004.01.09;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.018 c
6-25464
MyNickName
2003-11-09 09:30
2004.01.09
Перекодировка темы и текста сообщения.


4-25650
Prov
2003-11-06 09:35
2004.01.09
MessageBoxIndirect - don t work


14-25511
MPS
2003-12-18 11:09
2004.01.09
Стоит ли задумываться о Linux?


4-25667
Gilk
2003-11-05 15:35
2004.01.09
Статус завершения работы с документом


1-25429
EugenCFG
2003-12-23 22:32
2004.01.09
Здраствуйте ещё раз... ! На тему SetCapture... И определения