Форум: "Начинающим";
Текущий архив: 2008.06.29;
Скачать: [xml.tar.bz2];
Вниз
Окончание загрузки 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;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.044 c
