; Default installation directory (user can change on "Select Destination Location" page). ; Override at compile time: iscc /DDefaultInstallDir="D:\Apps\DIYLC" install.iss ; Silent install: install.exe /S /D=C:\MyPath\DIYLC #define DefaultInstallDir "{pf}\DIYLC" [Setup] AppName=DIY Layout Creator AppVersion={#diylcver} DefaultDirName={#DefaultInstallDir} DefaultGroupName=DIY Layout Creator UninstallDisplayIcon={app}\diylc.exe Compression=zip SolidCompression=yes OutputDir=..\..\target OutputBaseFilename=diylc-{#diylcver}-win64 ChangesAssociations=yes ; Show directory selection so user can choose install folder DisableDirPage=no AlwaysShowDirOnReadyPage=yes ; Suggest previous install path when upgrading UsePreviousAppDir=yes ; Only allow the installer to run on x64-compatible systems, ; and enable 64-bit install mode. ArchitecturesAllowed=x64compatible ArchitecturesInstallIn64BitMode=x64compatible [Files] Source: "diylc-x64.exe"; DestDir: "{app}"; DestName: "diylc.exe" Source: "..\..\src\main\resources\icons\diylc_file.ico"; DestDir: "{app}" Source: "..\..\target\diylc.jar"; DestDir: "{app}" Source: "..\..\target\jre_win\*"; DestDir: "{app}\jre17"; Flags: ignoreversion recursesubdirs Source: "donate.bmp"; DestDir: "{tmp}"; Flags: dontcopy nocompression [Registry] Root: HKCR; Subkey: ".diy"; ValueData: "DIYLC"; Flags: uninsdeletevalue; ValueType: string; ValueName: "" Root: HKCR; Subkey: "DIYLC"; ValueData: "Program DIYLC"; Flags: uninsdeletekey; ValueType: string; ValueName: "" Root: HKCR; Subkey: "DIYLC\DefaultIcon"; ValueData: "{app}\diylc_file.ico"; ValueType: string; ValueName: "" Root: HKCR; Subkey: "DIYLC\shell\open\command"; ValueData: """{app}\diylc.exe"" ""%1"""; ValueType: string; ValueName: "" [Icons] Name: "{group}\DIY Layout Creator"; Filename: "{app}/diylc.exe" [Run] Filename: "{app}/diylc.exe"; Description: "Launch DIYLC on exit"; Flags: postinstall skipifsilent [Code] procedure LicenseLinkClick(Sender: TObject); var ErrorCode: Integer; begin ShellExec('', 'http://www.diy-fever.com/donate', '', '', SW_SHOW, ewNoWait, ErrorCode); end; procedure InitializeWizard; var donateImage: TBitmapImage; begin ExtractTemporaryFile('donate.bmp'); donateImage := TBitmapImage.Create(WizardForm); donateImage.Parent:= WizardForm; donateImage.Bitmap.LoadFromFile(ExpandConstant('{tmp}\donate.bmp')); donateImage.Stretch := True; donateImage.Width := 142; donateImage.Height := 27; donateImage.Left := 8; donateImage.Top := WizardForm.InnerPage.Height + 10; donateImage.Cursor := crHand; donateImage.OnClick := @LicenseLinkClick; end;