ожидание 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;

> [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;

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