Hi, here is my script:
;InnoSetupVersion=5.5.0[Setup]AppName=Adobe Flash Player 15 + Shockwave Player 12 + Adobe Air 15 - AiOAppVersion=15.12.15AppPublisher=Adobe Systems, Inc.AppPublisherURL=www.adobe.comOutputBaseFilename=AdobeRuntimes_AiO_15.12.15_niTe.RiDeRCompression=lzma2/ultra64Uninstallable=noDisableProgramGroupPage=yesWizardImageFile=embedded\WizardImage.bmpLicenseFile=embedded\LicenseAgreement.rtfSolidCompression=yesInternalCompressLevel=ultraSetupIconFile=embedded\SetupIcon.icoWizardSmallImageFile=embedded\WizardSmallImage.bmpVersionInfoVersion=15.12.15VersionInfoCompany=Adobe Systems IncorporatedVersionInfoDescription=Adobe Runtimes AiO (Adobe Shockwave Player v12.1.4.154 + Flash Player v15.0.0.223 + Adobe AIR) RePacked SetupVersionInfoProductName=Adobe Runtimes AiOVersionInfoProductVersion=15.12.15VersionInfoProductTextVersion=12.12.15CreateAppDir=False[Files]Source: "{app}\install_flash_player_15_active_x.exe"; DestDir: "{tmp}"; Components: flashactivex; MinVersion: 0.0,5.01; Flags: deleteafterinstallSource: "{app}\install_flash_player_15_plugin.exe"; DestDir: "{tmp}"; Components: flashplugin; MinVersion: 0.0,5.01; Flags: deleteafterinstallSource: "{app}\sw_lic_full_installer.msi"; DestDir: "{tmp}"; Components: shockwave; MinVersion: 0.0,5.01; Flags: deleteafterinstallSource: "{app}\AdobeAIRInstaller.exe"; DestDir: "{tmp}"; Components: air; MinVersion: 0.0,5.01; Flags: deleteafterinstall Source: "embedded\ISWin7.dll"; DestDir: "{tmp}"; Flags: dontcopy nocompressionSource: "embedded\processviewer.exe"; DestDir: "{tmp}"; Flags: dontcopy[Run]Filename: "{tmp}\install_flash_player_15_active_x.exe"; Parameters: "-install"; StatusMsg: "Installing Flash Player 15 ActiveX; This can take a few minutes & the installer will freeze for a few seconds, so please wait..."; Components: flashactivex; MinVersion: 0.0,5.01;Filename: "{tmp}\install_flash_player_15_plugin.exe"; Parameters: "-install"; StatusMsg: "Installing Flash Player 15 Plugin; this can take few minutes & the installer will freeze for a few seconds, so please wait..."; Components: flashplugin; MinVersion: 0.0,5.01;Filename: "{tmp}\sw_lic_full_installer.exe"; Parameters: "/qb"; StatusMsg: "Installing Shockwave Player 12; This could take a few minutes & the installer will freeze for a few seconds, so please wait..."; Components: shockwave; MinVersion: 0.0,5.01;Filename: "{tmp}\AdobeAIRInstaller.exe"; Parameters: "-silent"; StatusMsg: "Installing Adobe AIR 15; this may take a few minutes & the installer will freeze for a few seconds, so please wait..."; Components: air; MinVersion: 0.0,5.01;[Components]Name: "flashplugin"; Description: "Adobe Flash Player v15.0.0.223 Plugin"; Types: "compact full"; MinVersion: 0.0,5.01; ExtraDiskSpaceRequired: 10485760Name: "flashactivex"; Description: "Adobe Flash Player v15.0.0.223 ActiveX"; Types: "compact full"; MinVersion: 0.0,5.01; ExtraDiskSpaceRequired: 10485760Name: "shockwave"; Description: "Adobe Shockwave Player v12.1.4.154"; Types: "compact full"; MinVersion: 0.0,5.01; ExtraDiskSpaceRequired: 10485760Name: "air"; Description: "Adobe AIR v15.0.0.356"; Types: "full"; MinVersion: 0.0,5.01; ExtraDiskSpaceRequired: 10485760[Messages]SelectComponentsLabel2=Select the runtimes you want to install; clear the runtimes you do not want to install. Click Next when you are ready to continue.WizardSelectComponents=Select RuntimesSelectComponentsDesc=Which runtimes should be installed?[Code]{ RedesignWizardFormBegin } // Don't remove this line!// Don't modify this section. It is generated automatically.var ISCustomPage2: TWizardPage; ISCustomPage3: TWizardPage; ISCustomPage1: TWizardPage; ISCustomPage4: TWizardPage; Label1: TLabel; Label2: TLabel; Label3: TLabel; Label4: TLabel; Label5: TLabel; Label6: TLabel; Label7: TLabel;procedure RedesignWizardForm;begin { Creates custom wizard page } ISCustomPage4 := CreateCustomPage(wpWelcome, 'Description', 'A Description of the Runtimes (Components)'); with WizardForm do begin AutoScroll := False; ClientHeight := ScaleY(363); ClientWidth := ScaleX(490); Caption := 'Setup - Adobe Runtimes AiO RePack'; end; with WizardForm.CancelButton do begin Left := ScaleX(404); end; with WizardForm.NextButton do begin Left := ScaleX(319); end; with WizardForm.BackButton do begin Left := ScaleX(244); end; with WizardForm.WizardBitmapImage do begin Width := ScaleX(180); end; with WizardForm.WelcomeLabel2 do begin Caption := 'This will install Adobe Flash Player 15 + Shockwave Player 12 + Adobe AIR 15 - AiO on your computer.' + #13#10 + '' + #13#10 + 'It is strongly recommended to close Google Chrome & Mozilla Firefox if they are open, otherwise the setup may require a reboot.' + #13#10 + 'You can choose which runtimes to install.' + #13#10 + '' + #13#10 + 'Click Next to continue, or Cancel to exit Setup.'; Left := ScaleX(184); Top := ScaleY(96); Width := ScaleX(293); Height := ScaleY(212); end; with WizardForm.WelcomeLabel1 do begin Caption := 'Welcome to the Adobe Runtimes AiO Setup Wizard by -=niTe_RiDeR_Pro=-'; Left := ScaleX(184); Width := ScaleX(307); Height := ScaleY(78); end; with WizardForm.ComponentsList do begin Top := ScaleY(69); end; { Label7 } Label7 := TLabel.Create(WizardForm); with Label7 do begin Name := 'Label7'; Parent := WizardForm; Caption := 'RePack by niTe_RiDeR_Pro'; Font.Color := clWindowText; Font.Height := -11; Font.Name := 'Tahoma'; Font.Style := [fsItalic]; ParentFont := False; Left := ScaleX(14); Top := ScaleY(331); Width := ScaleX(130); Height := ScaleY(13); end; { ISCustomPage4 } with ISCustomPage4.Surface do begin Color := clBtnFace; end; { Label1 } Label1 := TLabel.Create(WizardForm); with Label1 do begin Parent := ISCustomPage4.Surface; Caption := 'Adobe Flash Player:'; Font.Color := clWindowText; Font.Height := -11; Font.Name := 'Tahoma'; Font.Style := [fsBold]; ParentFont := False; Left := ScaleX(8); Top := ScaleY(8); Width := ScaleX(110); Height := ScaleY(13); end; { Label2 } Label2 := TLabel.Create(WizardForm); with Label2 do begin Parent := ISCustomPage4.Surface; AutoSize := False; Caption := 'Adobe Flash Player is the standard for delivering high-impact, rich Web content. ' + #13#10 + 'Designs, animation, and application user interfaces are deployed immediately across' + #13#10 + 'attracting and engaging users with a rich Web experience.'; Left := ScaleX(8); Top := ScaleY(24); Width := ScaleX(407); Height := ScaleY(61); end; { Label3 } Label3 := TLabel.Create(WizardForm); with Label3 do begin Parent := ISCustomPage4.Surface; Caption := 'Adobe Shockwave Player:'; Font.Color := clWindowText; Font.Height := -11; Font.Name := 'Tahoma'; Font.Style := [fsBold]; ParentFont := False; Left := ScaleX(8); Top := ScaleY(80); Width := ScaleX(145); Height := ScaleY(13); end; { Label4 } Label4 := TLabel.Create(WizardForm); with Label4 do begin Parent := ISCustomPage4.Surface; Caption := 'Shockwave Player is the web standard for powerful multimedia playback. The ' + #13#10 + 'Shockwave Player allows you to view interactive web content like games,' + #13#10 + ' business presentations, entertainment, and advertisements from your web browser. '; Left := ScaleX(8); Top := ScaleY(96); Width := ScaleX(412); Height := ScaleY(39); end; { Label5 } Label5 := TLabel.Create(WizardForm); with Label5 do begin Parent := ISCustomPage4.Surface; Caption := 'Adobe AIR:'; Font.Color := clWindowText; Font.Height := -11; Font.Name := 'Tahoma'; Font.Style := [fsBold]; ParentFont := False; Left := ScaleX(8); Top := ScaleY(152); Width := ScaleX(63); Height := ScaleY(13); end; { Label6 } Label6 := TLabel.Create(WizardForm); with Label6 do begin Parent := ISCustomPage4.Surface; Caption := 'Adobe AIR is a cross-operating-system runtime that lets developers combine HTML, ' + #13#10 + 'JavaScript, Adobe Flash® and Flex technologies, and ActionScript®; and also lets ' + #13#10 + 'users to deploy rich Internet applications (RIAs) on a broad range of devices including ' + #13#10 + 'desktop computers, netbooks, tablets, smartphones, and TVs. '; Left := ScaleX(8); Top := ScaleY(168); Width := ScaleX(415); Height := ScaleY(52); end; with WizardForm.MainPanel do begin Left := ScaleX(0); Top := ScaleY(0); end; with WizardForm.PageDescriptionLabel do begin Transparent := True; Left := ScaleX(24); Top := ScaleY(29); end; with WizardForm.PageNameLabel do begin AutoSize := True; Left := ScaleX(16); Top := ScaleY(8); Width := ScaleX(4); end;{ ReservationBegin } // This part is for you. Add your specialized code here.{ ReservationEnd }end;// Don't modify this section. It is generated automatically.{ RedesignWizardFormEnd } // Don't remove this line!procedure ISCustomPage1Activate(Sender: TWizardPage);beginend;procedure iswin7_add_glass(Handle:HWND; Left, Top, Right, Bottom : Integer; GDIPLoadMode: boolean);external 'iswin7_add_glass@files:iswin7.dll stdcall';procedure iswin7_add_button(Handle:HWND);external 'iswin7_add_button@files:iswin7.dll stdcall';procedure iswin7_free;external 'iswin7_free@files:iswin7.dll stdcall';procedure InitializeWizard();begin RedesignWizardForm; iswin7_add_button(WizardForm.BackButton.Handle); iswin7_add_button(WizardForm.NextButton.Handle); iswin7_add_button(WizardForm.CancelButton.Handle); iswin7_add_glass(WizardForm.Handle, 0, 0, 0, ScaleY(50), True);end;procedure DeinitializeSetup();begin iswin7_free;end;
So, At the time of installation, I want to do the following things if the user selects the component named 'flashplugin':
Check whether the process 'chrome.exe' & 'firefox.exe' is running, and show a message box if it is running. If google chrome is running, The message box should show 'Google Chrome is running. please close it or else the setup will close it automatically'; and if Firefox is running the messsage box should show 'Mozilla Firefox is running. please close it or else the setup will close it automatically'. If the user chooses OK and still any of the processes are open, the setup should kill it automatically. Please add the code for this into my script. If this isnt possible inno atleast this:
Check whether the process 'chrome.exe' & 'firefox.exe' is running, and show a message box if it is running. If google chrome is running, The message box should show 'Google Chrome is running. please close it or else the setup will close it automatically'; and if Firefox is running the messsage box should show 'Mozilla Firefox is running. please close it or else the setup will close it automatically'. If the user chooses OK and still any of the processes are open, the setup should kill it automatically.
A million thanks