123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778 |
- ; Script generated by the Inno Setup Script Wizard.
- ; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!
- #pragma option -v+
- #pragma verboselevel 9
- #define MyAppName "PRS Server"
- #define MyAppVersion "6.39f"
- #define MyAppPublisher "PRS Digital"
- #define MyAppURL "https://www.prs-software.com.au"
- #define MyAppExeName "PRSServer.exe"
- [Setup]
- ; NOTE: The value of AppId uniquely identifies this application.
- ; Do not use the same AppId value in installers for other applications.
- ; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
- AppId={{832E3B50-6076-4978-B758-E570576565CF}
- AppName={#MyAppName}
- AppVersion={#MyAppVersion}
- AppVerName={#MyAppName} {#MyAppVersion}
- AppPublisher={#MyAppPublisher}
- AppPublisherURL={#MyAppURL}
- AppSupportURL={#MyAppURL}
- AppUpdatesURL={#MyAppURL}
- DefaultDirName={pf}\{#MyAppName}
- DisableProgramGroupPage=yes
- OutputDir=E:\Development\prs\prs.server\
- SourceDir=E:\Development\prs\prs.server\
- OutputBaseFilename=PRSServerSetup
- Compression=lzma
- SolidCompression=yes
- SetupLogging=yes
- CloseApplications=force
- ; ArchitecturesInstallIn64BitMode=x64
- [Languages]
- Name: "english"; MessagesFile: "compiler:Default.isl"
- [Tasks]
- Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}";
- [InstallDelete]
- Type: files; Name: {userappdata}\PRSServer\version.txt
- [Files]
- Source: "bin\Debug\net6.0-windows\*.*"; Excludes: "ServerSettings.settings, version.txt"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs; AfterInstall: UpdateVersionNumber
- [Dirs]
- Name: "{userappdata}\PRSServer\";
- [Icons]
- Name: "{userprograms}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"
- Name: "{userdesktop}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"; Tasks: desktopicon
- [Run]
- Filename: "{app}\{#MyAppExeName}"; Description: "{cm:LaunchProgram,{#StringChange(MyAppName, '&', '&&')}}"; Flags: nowait postinstall skipifsilent
- [Code]
- var
- versionupdated : Boolean;
- procedure UpdateVersionNumber();
- var
- version : AnsiString;
- filename : String;
- filename_update : String;
- begin
- if (versionupdated = False) then
- begin
- version := '{#MyAppVersion}';
- filename := ExpandConstant('{app}\version.txt');
- SaveStringToFile(filename,version,false);
- filename_update := ExpandConstant('{app}\update\version.txt');
- SaveStringToFile(filename_update,version,false);
- versionupdated := true;
- end;
- end;
|