Цикл, время выполнения шага

[KiDoki]

Есть цикл:

for I := 1 to 70000 - 1 do
    begin
    if Flag then Break;
    idHttp1.Get('ссылка'+inttostr(i));
    Label1.Caption:=inttostr(i);
    Application.ProcessMessages;
    end;

Подскажите как сделать так, чтобы шаг цикла(просмотр страницы) длился какое-то время. То есть чтобы загрузка страницы длилась к примеру 5 секунд.

ЗЫ Что будет если я добавлю в цикл Sleep? Будет ли страница загружаться дальше?

[Hollander]

А ты сам не пробывал использовать Sleep()?
Вообще должна загружаться, Sleep - остановит текущий поток на время что ты указал. Не забудь время указывается милисекундах, т.е. 5 сек - Sleep(5000);

[KiDoki]

Как мне проверить что страница все ещё загружается? Цикл останавливается на время Sleep, но я не знаю как проверить что страница все ещё грузится...

[KiDoki]

Вопрос всё ещё в силе.

[Arigato]

Надо обрабатывать события компонента TIdHTTP, в частности: onDisconnected

[KiDoki]

Поточнее пожалуйста. Что писать в событии?
*добавил*
Как я понимаю надо сделать так:
цикл:
коннект к странице, когда вся загрузилась идём к след. сранице.

Как сделать так, чтобы цикл переходил к след. шагу только если выполняется условие?(idHttp.OnDisconnected)

[Arigato]

Не будет ни какого цикла. Коннектимся, ждем дисконнект (не паникуем), на обработчике события дисконнекта коннектимся к следующему элементу.

[KiDoki]

У меня ~70000 тысяч элементов, как без цикла? Не пойму... =\
И ещё вопросик, долго я буду ждать дисконнекта?

[Arigato]

И ещё вопросик, долго я буду ждать дисконнекта?

Зависит от многих факторов.

как без цикла?

Просто Вы не понимаете основ и то, чего хотите. Объяснять мне лень, извините.

[KiDoki]

Подскажите только какими функциями пользоваться, дальше постораюсь сам.