SHARE
TWEET

Untitled

a guest Mar 20th, 2019 59 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. procedure CurPageChanged(CurPageID: Integer);
  2. begin
  3.   If CurPageID=PageInstallationPersonnalisee.ID then
  4.     begin
  5.       ProgressBarLabelPageInstPerso.Caption := 'Initialisation...';
  6.       if InstallTool1 = True then
  7.         begin
  8.           ProgressBarLabelPageInstPerso.Caption := 'Installing InstallTool1...';
  9.           F_InstallTool1();
  10.         end;
  11.       if InstallTool2 = True then
  12.         begin
  13.           ProgressBarLabelPageInstPerso.Caption := 'Installing InstallTool2...';
  14.           F_InstallTool2();
  15.         end;
  16.       if InstallTool3 = True then
  17.         begin
  18.           ProgressBarLabelPageInstPerso.Caption := 'Installing InstallTool3...';
  19.           F_InstallTool3();
  20.         end;
  21.  
  22.       ProgressBarPageInstPerso.Style := npbstMarquee;
  23.       //ProgressBarPageInstPerso.Style := npbstNormal;
  24.       ProgressBarPageInstPerso.Position := 100;
  25.  
  26.       CancelWithoutPrompt:=True;
  27.       WizardForm.Close;
  28.     end;
  29. end;
  30.      
  31. [Setup]
  32. SolidCompression=no
  33.  
  34. [Files]
  35. ;Temporary redists
  36. Source: "{#MyRessourcesPath}InstallTool1_Setup.exe"; DestDir: "{tmp}"; Flags: deleteafterinstall noencryption dontcopy
  37. Source: "{#MyRessourcesPath}InstallTool2_Setup.exe"; DestDir: "{tmp}"; Flags: deleteafterinstall noencryption dontcopy
  38. Source: "{#MyRessourcesPath}InstallTool3_Setup.exe"; DestDir: "{tmp}"; Flags: deleteafterinstall noencryption dontcopy
  39.      
  40. [Files]
  41. ;Temporary redists
  42. Source: "{#MyRessourcesPath}InstallTool1_Setup.exe"; DestDir: "{tmp}";
  43.   Flags: deleteafterinstall noencryption dontcopy; AfterInstall: Install1
  44. Source: "{#MyRessourcesPath}InstallTool2_Setup.exe"; DestDir: "{tmp}";
  45.   Flags: deleteafterinstall noencryption dontcopy; AfterInstall: Install2
  46. Source: "{#MyRessourcesPath}InstallTool3_Setup.exe"; DestDir: "{tmp}";
  47.   Flags: deleteafterinstall noencryption dontcopy; AfterInstall: Install3
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top