Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ;InnoSetupVersion=5.5.0
- [Setup]
- AppName=Adobe Flash Player 15 + Shockwave Player 12 + Adobe Air 15 - AiO
- AppVersion=15.12.15
- AppPublisher=Adobe Systems, Inc.
- AppPublisherURL=www.adobe.com
- OutputBaseFilename=AdobeRuntimes_AiO_15.12.15_niTe.RiDeR
- Compression=lzma2/ultra64
- Uninstallable=no
- DisableProgramGroupPage=yes
- WizardImageFile=embedded\WizardImage.bmp
- LicenseFile=embedded\LicenseAgreement.rtf
- SolidCompression=yes
- InternalCompressLevel=ultra
- SetupIconFile=embedded\SetupIcon.ico
- WizardSmallImageFile=embedded\WizardSmallImage.bmp
- VersionInfoVersion=15.12.15
- VersionInfoCompany=Adobe Systems Incorporated
- VersionInfoDescription=Adobe Runtimes AiO (Adobe Shockwave Player v12.1.4.154 + Flash Player v15.0.0.223 + Adobe AIR) RePacked Setup
- VersionInfoProductName=Adobe Runtimes AiO
- VersionInfoProductVersion=15.12.15
- VersionInfoProductTextVersion=12.12.15
- CreateAppDir=False
- [Files]
- Source: "{app}\install_flash_player_15_active_x.exe"; DestDir: "{tmp}"; Components: flashactivex; MinVersion: 0.0,5.01; Flags: deleteafterinstall
- Source: "{app}\install_flash_player_15_plugin.exe"; DestDir: "{tmp}"; Components: flashplugin; MinVersion: 0.0,5.01; Flags: deleteafterinstall
- Source: "{app}\sw_lic_full_installer.msi"; DestDir: "{tmp}"; Components: shockwave; MinVersion: 0.0,5.01; Flags: deleteafterinstall
- Source: "{app}\AdobeAIRInstaller.exe"; DestDir: "{tmp}"; Components: air; MinVersion: 0.0,5.01; Flags: deleteafterinstall
- Source: "embedded\ISWin7.dll"; DestDir: "{tmp}"; Flags: dontcopy nocompression
- [Run]
- Filename: "{tmp}\install_flash_player_15_active_x.exe"; Parameters: "-install"; StatusMsg: "Installing Flash Player 15 ActiveX; 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; Please wait..."; Components: flashplugin; MinVersion: 0.0,5.01;
- Filename: "{tmp}\sw_lic_full_installer.msi"; Parameters: "/qn"; StatusMsg: "Installing Shockwave Player 12; Please wait..."; Components: shockwave; MinVersion: 0.0,5.01; Flags: shellexec
- Filename: "{tmp}\AdobeAIRInstaller.exe"; Parameters: "-silent"; StatusMsg: "Installing Adobe AIR 15; 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: 10485760
- Name: "flashactivex"; Description: "Adobe Flash Player v15.0.0.223 ActiveX"; Types: "compact full"; MinVersion: 0.0,5.01; ExtraDiskSpaceRequired: 10485760
- Name: "shockwave"; Description: "Adobe Shockwave Player v12.1.4.154"; Types: "compact full"; MinVersion: 0.0,5.01; ExtraDiskSpaceRequired: 10485760
- Name: "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 Runtimes
- SelectComponentsDesc=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 AiO RePack will install Adobe Flash Player v15.0.0.223 + Shockwave Player v12.1.4.154 + Adobe AIR v15.0.0.356 on your computer.' + #13#10 +
- '' + #13#10 +
- 'It is strongly recommended to close other web browsers.' + #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(94);
- 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);
- begin
- end;
- 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;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement