Сборник лабораторных работ по дисциплине "Прикладное программное обеспечение". Самохвалов К.М. - 36 стр.

UptoLike

Составители: 

36
OnNavigateComplete2
Возникает, когда попытка навигации была успешной. Наблюдения за
WebBrowser позволяют сделать предположение, что это событие возникает
после того, как с сервера придет первая порция данных. Документ еще про-
должает загружаться.
OnDocumentComplete
Возникает при окончании загрузки в независимости от того, был ли до-
кумент загружен полностью или нет. К сожалению, нет простого
критерия
для определения того, была ли страница загружена полностью или нет.
OnNewWindow2
Возникает при попытке открыть документ в новом окне. Если Вы хоти-
те, чтобы документ был открыт в Вашем экземпляре браузера, то Вам нужно
создать свой экземпляр браузера и параметру ppDisp присвоить интерфейс-
ную ссылку на этот экземпляр [7].
Ниже приведены
примеры использования компонента для доступа к
информации, размещенной на web-странице.
Как получить текст HTML документа из TWebBrowser?
uses
..., MSHTML;
procedure TForm1.FormCreate(Sender: TObject);
begin
WebBrowser1.Navigate('http://decoding.narod.ru');
end;
procedure TForm1.Button1Click(Sender: TObject);
var
Document: IHTMLDocument2;
begin
Document := WebBrowser1.Document as IHtmlDocument2;