View Single Post
  #23  
Old 09-03-2013, 12:09
altef_4's Avatar
altef_4 altef_4 is offline
Registered User
 
Join Date: Mar 2012
Location: Ukraine
Posts: 361
Thanks: 248
Thanked 1,022 Times in 239 Posts
altef_4 is on a distinguished road
Smile

Quote:
Originally Posted by danswano View Post
Thank you very much dear altef, it's working fine but i'm wondering if it's possible to show the green progress bar for the tasks/install actions progress bar you provided for me in previous posts.
easy, change this
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 + WizardForm.ProgressGauge.Max div i2;
result:=true;
end;
to this
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 + WizardForm.ProgressGauge.Max div i2;
SetTaskBarProgressValue(WizardForm.ProgressGauge.Position);
result:=true;
end;
Reply With Quote
The Following User Says Thank You to altef_4 For This Useful Post:
danswano (09-03-2013)