Установите положение на максимальное значение бара минус значение.
pBar.value := iProgSize - iProg;
Обработанное число равно общему количеству, подлежащему обработке, минус число, оставшееся для обработки. Обработано = Итого - Осталось.
Если у нас есть 1000 для обработки, 900 осталось, то 100 были обработаны (1000 - 100).