Спасибо всем за ответы. Всё получилось.
2randrews: да, вместо CurrForm.Update надо было просто написать CurrForm.ProgressBar.UPDATE Где ProgressBar - имя контрола.
Цитата:
Да и вообще step:=ROUND(100/WOList.COUNT,1,'='); это неправильно.
Если у тебя будет количество записей 100000, то твой шаг будет равен 0 !!!!!!!
Сглупил, согласен. Но изящней всё-таки, если шкала будет заполняться от 0 до 100%, а не до какого-либо значения, в зависимости от количества записей.