Skip to content
Merged
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
21 changes: 15 additions & 6 deletions Resources/Installer/GreenSwampSetup.iss
Original file line number Diff line number Diff line change
@@ -1,4 +1,4 @@
; Script generated by the ASCOM Driver Installer Script Generator 6.2.0.0
; Script generated by the ASCOM Driver Installer Script Generator 6.2.0.0
; Generated by Robert Morgan on 5/20/2018 (UTC)
#define MyAppVersion "1.2.2.4"
#define ManualName "GSS Manual v1224.pdf"
Expand Down Expand Up @@ -44,6 +44,7 @@ Name: "english"; MessagesFile: "compiler:Default.isl"
Name: "french"; MessagesFile: "compiler:Languages\French.isl"
Name: "german"; MessagesFile: "compiler:Languages\German.isl"
Name: "italian"; MessagesFile: "compiler:Languages\Italian.isl"
; Keep this script and ChineseSimplified.isl as UTF-8 with BOM when building with Inno Setup < 6.3.
Name: "chinese"; MessagesFile: "compiler:Languages\ChineseSimplified.isl"

[Dirs]
Expand Down Expand Up @@ -73,8 +74,8 @@ Source: "..\Manuals\GSS Manual.pdf"; DestDir: "{app}"; DestName:"{#ManualName}";
[Messages]
english.WelcomeLabel2={#MyAppName} {#MyAppVersion}%n%nThis will install {#MyAppName} {#MyAppVersion} on your computer.%n%nIt is recommended that you close all other applications that may be currently using {#MyAppName}
french.WelcomeLabel2={#MyAppName} {#MyAppVersion}%n%nCela installera {#MyAppName} {#MyAppVersion} sur votre ordinateur.%n%nIl est recommandé de fermer toutes les autres applications qui utilisent actuellement {#MyAppName}
german.WelcomeLabel2={#MyAppName} {#MyAppVersion}%n%nThis will install {#MyAppName} {#MyAppVersion} auf deinem Computer.%n%nEs wird empfohlen, alle anderen Anwendungen zu schließen, die derzeit möglicherweise verwendet werden {#MyAppName}
italian.WelcomeLabel2={#MyAppName} {#MyAppVersion}%n%nThis will install {#MyAppName} {#MyAppVersion} sul tuo computer.%n%nSi consiglia di chiudere tutte le altre applicazioni attualmente in uso {#MyAppName}
german.WelcomeLabel2={#MyAppName} {#MyAppVersion}%n%nDadurch wird {#MyAppName} {#MyAppVersion} auf deinem Computer.%n%nEs wird empfohlen, alle anderen Anwendungen zu schließen, die derzeit möglicherweise verwendet werden {#MyAppName}
italian.WelcomeLabel2={#MyAppName} {#MyAppVersion}%n%nQuesto installerà {#MyAppName} {#MyAppVersion} sul tuo computer.%n%nSi consiglia di chiudere tutte le altre applicazioni attualmente in uso {#MyAppName}
chinese.WelcomeLabel2={#MyAppName} {#MyAppVersion}%n%n这将在你的计算机上安装 {#MyAppName} {#MyAppVersion}。%n%n建议关闭当前可能正在使用 {#MyAppName} 的所有其他应用程序。

[Tasks]
Expand Down Expand Up @@ -164,14 +165,22 @@ begin
// Check whether an extry exists
if RegQueryStringValue(HKLM, UninstallRegistry, 'UninstallString', UninstallExe) then
begin // Entry exists and previous version is installed so run its uninstaller quietly after informing the user
if ActiveLanguage = 'en' then
if ActiveLanguage = 'english' then
begin
MsgBox('Setup will now remove the previous version.', mbInformation, MB_OK);
end;
if ActiveLanguage = 'fr' then
if ActiveLanguage = 'french' then
begin
MsgBox('Le programme d''installation supprimera désormais la version précédente.', mbInformation, MB_OK);
end;
if ActiveLanguage = 'german' then
begin
MsgBox('Das Setup entfernt nun die vorherige Version.', mbInformation, MB_OK);
end;
if ActiveLanguage = 'itialian' then
begin
MsgBox('Il programma di installazione rimuoverà ora la versione precedente.', mbInformation, MB_OK);
end;
if ActiveLanguage = 'chinese' then
begin
MsgBox('安装程序现在将移除以前的版本。', mbInformation, MB_OK);
Expand All @@ -188,4 +197,4 @@ begin
newfilepathname := ExpandConstant('{app}\') + logfilename;
FileCopy(logfilepathname, newfilepathname, false);
end;
end;
end;