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

Вниз

Окончание загрузки TWebBrowser   Найти похожие ветки 

 
ajunta ©   (2008-06-01 15:49) [0]

всем доброго времени суток. помогите пожалуйста решить задачку:

надо выполнить процедуру по завершению загрузки странички в TWebBrowser, посмотрел его события - нашел несколько, но все они (OnDownloadComplete, OnDocumetnComplete, OnNavigateComplete) вызывабтся несколько раз, (пробовал заходить на torrents.ru)

как-то можно отловить момет когда уже все загружено?


 
Ум_ще   (2008-06-01 16:15) [1]

Не пробовал такой вариант?

 while WebBrowser1.Busy do Application.ProcessMessages;


 
ajunta ©   (2008-06-01 20:52) [2]

Попробовал, но в такой ситуации например:


procedure TForm1.Button5Click(Sender: TObject);
var i:integer;
   Persist : IPersistFile;
   Document : IHTMLDocument2;
   b : LongBool;

  source:string;
  filename: pWideChar;

begin
for i:= 0 to 10 do begin
 WebBrowser.Navigate("http://www.google.com/search?q="+inttostr(i));
 while WebBrowser.Busy do Application.ProcessMessages;
 Document := WebBrowser.Document as IHTMLDocument2;
 Persist := Document as IPersistFile;
 b:=false;
 source:="page"+inttostr(i)+".html";
 GetMem(filename, sizeof(WideChar) * Succ(Length(source)));
 StringToWideChar(source, filename, Succ(Length(source)));
 Persist.Save(filename,b);
 FreeMem(filename);
end;
log.Lines.Add("OK!")
end;


зада была в том, что бы сохранить результаты поиска для циф от 0 для 10, но в результате во всех файла только результат поиска для 0, а дальше ничего не меняется, хотя Navigate вызывается... :-\


 
имя   (2008-06-01 21:06) [3]

Удалено модератором


 
имя   (2008-06-01 21:08) [4]

Удалено модератором


 
ajunta ©   (2008-06-01 21:09) [5]


> разу после окончания загруки страницы управление передаётся
> DocumentComplete


если WebBrowser1.Navigate("google.com");
OnDocumentComplete выполниться не один раз. оно вызывается еще до того, как страничка прогрузилась на деле.


 
имя   (2008-06-01 21:11) [6]

Удалено модератором


 
имя   (2008-06-01 21:18) [7]

Удалено модератором


 
ajunta ©   (2008-06-01 21:20) [8]

Если бы к гуглю.... значит способ неуниверсальный....


 
Умище-0111   (2008-06-01 22:27) [9]


> ajunta ©   (01.06.08 21:20) [8]
> Если бы к гуглю.... значит способ неуниверсальный....


У меня один раз срабатывает.


 
palva ©   (2008-06-01 23:05) [10]

как-то можно отловить момет когда уже все загружено?
Сначала надо понять, что значит все загружено. Если страничка загрузилась, но через 1 секунду она снова обратится с запросом к Интернету, а через пять секунд еще... Можно ли про нее говорить, что все загружено?

То есть нужно рассматривать конкретный сайт и выяснять, что означает каждый NavigateComplete


 
Vlad Oshin ©   (2008-06-02 09:31) [11]

может такого дожидаться на странице?
</HTML>


 
Vlad Oshin ©   (2008-06-02 09:31) [12]

может такого дожидаться на странице?
</HTML>


 
Vlad Oshin ©   (2008-06-02 09:31) [13]

может такого дожидаться на странице?
</HTML>


 
Правильный_Вася   (2008-06-02 11:21) [14]

OnNavigateComplete2 event (TWebBrowser)
?



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

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

Наверх




Память: 0.49 MB
Время: 0.02 c
15-1210759991
freezon
2008-05-14 14:13
2008.06.29
dxComponentPrinter и cxgrid


2-1212353489
Blue Dragon
2008-06-02 00:51
2008.06.29
Инвертировать Нумлок и Капслок


10-1146918480
Dmitrij_K
2006-05-06 16:28
2008.06.29
IHTMLDocument2 получение всех ссылок


15-1211181236
Ega23
2008-05-19 11:13
2008.06.29
Строки из resource-файла или что-то другое?


3-1201027383
Ega23
2008-01-22 21:43
2008.06.29
ISQL в FireBird - передать скрипт и получить результат