Progress bar for Tasks

[altef_4]

[Setup]
AppName=Example
AppVerName=Example
DefaultDirName={pf}\Example
OutputDir=.
OutputBaseFilename=Example

[Tasks]
Name: VCCheck; Description: Установить Microsoft Visual C++ 2005 Redist
Name: PhysXCheck; Description: Установить Nvidia PhysX

[Run]
Filename: {src}\Redist\vcredist_x86.exe; Parameters: /q; StatusMsg: Устанавливаем Microsoft Visual C++ 2005 Redist...; Flags: waituntilterminated; Tasks: VCCheck; Check: SetPBPos
Filename: {src}\Redist\PhysX.exe; Parameters: /qn; StatusMsg: Устанавливаем Nvidia PhysX...; Flags: waituntilterminated; Tasks: PhysXCheck; Check: SetPBPos

[_Code]
function SetPBPos:boolean;
begin
  if (WizardForm.ProgressGauge.Max > 100) then WizardForm.ProgressGauge.Max:=100;
  if (WizardForm.ProgressGauge.Position = 100) then WizardForm.ProgressGauge.Position:=0;
  WizardForm.ProgressGauge.Position:=WizardForm.ProgressGauge.Position + 50;
  result:= true;
end;