[Alloc]

Все приветы! Уважаемые форумчане, подскажите как грамотно реализовать алгоритм, который будет отображать в компоненте Label проценты из ProgressGauge (progressbar); Я имею данный скрипт:

Код:

procedure ExtLog();
begin
  with WizardForm.ProgressGauge do
    ProgressLabel.Caption:=IntToStr((Position-Min)/((Max - Min)/100)) + '%';
end;

Далее я просто вставляю ссылку процедуры на файлы в раздел [Files] таким образомЖ

Код:

[Files]
Source: E:\Program*; DestDir: {app}; Flags: ignoreversion recursesubdirs createallsubdirs; AfterInstall: ExtLog();

Вроде как все правильно и оно работает, но проценты из ProgressLabel под конец доходят до 112% а не до 100 как должно быть..
Уважаемые, помогите пожалуйста решить данный косяк...