[quote=art;357412]
Цитата:
Сообщение от
romeo
Получается прогресс будет прыгать , то вперед, то назад ?
Почему? Может я чего-то не вижу. Будет по I равномерно идти, а по J - в зависимости от кода. То есть
1 итерация первого цикла (вложенный цикл большой)
2 итерация первого цикла (вложенный цикл маленький)
3 итерация первого цикла (вложенный цикл большой)
Должно - треть прогресс бара идти медленно, вторая треть быстро, третья медленно.
Ах, да. I := I + 1 лучше в конец поставить - ошибся.
Перед UNTIL Employee1.NEXT = 0;