Martijn Laan 2 weeks ago
parent
commit
adffa526e2
1 changed files with 5 additions and 5 deletions
  1. 5 5
      Examples/AllPagesExample.iss

+ 5 - 5
Examples/AllPagesExample.iss

@@ -13,6 +13,7 @@ UninstallDisplayIcon={app}\MyProg.exe
 Compression=lzma2
 Compression=lzma2
 SolidCompression=yes
 SolidCompression=yes
 OutputDir=userdocs:Inno Setup Examples Output
 OutputDir=userdocs:Inno Setup Examples Output
+PrivilegesRequired=lowest
 
 
 DisableWelcomePage=no
 DisableWelcomePage=no
 LicenseFile=license.txt
 LicenseFile=license.txt
@@ -20,7 +21,6 @@ LicenseFile=license.txt
 Password={#Password}
 Password={#Password}
 InfoBeforeFile=readme.txt
 InfoBeforeFile=readme.txt
 UserInfoPage=yes
 UserInfoPage=yes
-PrivilegesRequired=lowest
 DisableDirPage=no
 DisableDirPage=no
 DisableProgramGroupPage=no
 DisableProgramGroupPage=no
 InfoAfterFile=readme.txt
 InfoAfterFile=readme.txt
@@ -99,22 +99,22 @@ var
 begin
 begin
   if CurPageID = OutputProgressWizardPagesAfterID then begin
   if CurPageID = OutputProgressWizardPagesAfterID then begin
     try
     try
-      Max := 50;
+      Max := 100;
       for I := 0 to Max do begin
       for I := 0 to Max do begin
         OutputProgressWizardPage.SetProgress(I, Max);
         OutputProgressWizardPage.SetProgress(I, Max);
         if I = 0 then
         if I = 0 then
           OutputProgressWizardPage.Show;
           OutputProgressWizardPage.Show;
-        Sleep(2000 div Max);
+        Sleep(3000 div Max);
       end;
       end;
     finally
     finally
       OutputProgressWizardPage.Hide;
       OutputProgressWizardPage.Hide;
     end;
     end;
     try
     try
-      Max := 50;
+      Max := 100;
       OutputMarqueeProgressWizardPage.Show;
       OutputMarqueeProgressWizardPage.Show;
       for I := 0 to Max do begin
       for I := 0 to Max do begin
         OutputMarqueeProgressWizardPage.Animate;
         OutputMarqueeProgressWizardPage.Animate;
-        Sleep(2000 div Max);
+        Sleep(3000 div Max);
       end;
       end;
     finally
     finally
       OutputMarqueeProgressWizardPage.Hide;
       OutputMarqueeProgressWizardPage.Hide;