А мое вложение не катит? Там по моему есть ответ на твой вопрос! в виде работающего сорца. Только не забудь в таймере(моего исходника) вот это вставить(все остальное из таймера убери)
Код:
sec:=RazSec-SecondsBetween(time,t2);
ProgressBar1.Position:=(round(100*(sec-sec1)/RazSec));
что делает программа:
сначала вычесляет кол-во секунд между двумя time-ми (SecondsBetween)
потом (уже в таймере) вычесляется текущя секунда относительно найденого интервала(кол-ва секунд).
А потом с помощью обычной интерполяции находим положение прогрессбара
он как раз и показывает проценты(possition)