Скачать: CL | DM;

ожидание documentcomplete   Найти похожие ветки 

← →
syte_ser78 ©   (2006-09-26 14:42) [0]

Есть следующая задача:

Имеется массив адрессов которые необходимо загрузить в tWebBrowser

Как дождаться события documenrcomplete перед загрузкой следующего адресса?

В смысле

for i:=1 to x
 begin
 webbrowser.navigate(adress[i]);
//  ждем documentcoplete
 end;

---

← →
clickmaker ©   (2006-09-26 14:51) [1]

эээ... обработчик события OnDocumentComplete
только непонятно, зачем в цикле менять адреса?

---

← →
syte_ser78 ©   (2006-09-26 14:59) [2]

в цикле будут подставлятся адреса с различными гетпатхами

webbrowser.navigate(/client/post?topic_id="а это меняем");

---

← →
syte_ser78 ©   (2006-09-26 15:11) [3]

clickmaker ©   (26.09.06 14:51) [1]
Насколько я Вас понял (и как делал раньше) это выглядит примерно так

wb.onDocumentComplete;
begin
go:=1;
end;

procedure update;
begin
for i:=a to b do
  begin
  go:=0;
  wb.nawigate(adress[i]);
  while go=0 do  
   begin
   end;
  end;
end;

---

← →
clickmaker ©   (2006-09-26 15:14) [4]

> [3] syte_ser78 ©   (26.09.06 15:11)

ну примерно. Только пустые циклы ожидания не стоит делать.
либо так
while not go do begin
  Application.ProcessMessages;
  Sleep(100);
end;
либо создать событие
ev := TEvent.Create;
wb.nawigate(adress[i]);
ev.WaitFor;

wb.onDocumentComplete;
begin
 ev.SetEvent;
end;

---

← →
syte_ser78 ©   (2006-09-26 15:19) [5]

clickmaker ©   (26.09.06 15:14) [4]
Большое спасибо!

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.031 c