mirror of
https://github.com/ra3xdh/qucs_s
synced 2025-03-28 21:13:26 +00:00
uninstall old version if it installed before.
This commit is contained in:
parent
c94049bf52
commit
046f2f7003
@ -1,5 +1,5 @@
|
|||||||
;
|
; Qucs-S Inno Setup script file
|
||||||
; qucs.iss - inno Setup script file
|
; Refactored for improved readability and maintainability
|
||||||
;
|
;
|
||||||
; Copyright (C) 2005-2011 Stefan Jahn <stefan@lkcc.org>
|
; Copyright (C) 2005-2011 Stefan Jahn <stefan@lkcc.org>
|
||||||
; Copyright (C) 2014-2016 Guilherme Brondani Torri <guitorri@gmail.com>
|
; Copyright (C) 2014-2016 Guilherme Brondani Torri <guitorri@gmail.com>
|
||||||
@ -18,7 +18,7 @@
|
|||||||
; along with this package; see the file COPYING. If not, write to
|
; along with this package; see the file COPYING. If not, write to
|
||||||
; the Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor,
|
; the Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor,
|
||||||
; Boston, MA 02110-1301, USA.
|
; Boston, MA 02110-1301, USA.
|
||||||
;
|
|
||||||
#ifndef RELEASE
|
#ifndef RELEASE
|
||||||
#define RELEASE "24.3.0"
|
#define RELEASE "24.3.0"
|
||||||
#endif
|
#endif
|
||||||
@ -31,37 +31,33 @@
|
|||||||
#define TREE "..\..\build\qucs-suite\"
|
#define TREE "..\..\build\qucs-suite\"
|
||||||
|
|
||||||
[Setup]
|
[Setup]
|
||||||
AppName={# APPNAME}
|
AppName={#APPNAME}
|
||||||
AppVersion={# RELEASE}
|
AppVersion={#RELEASE}
|
||||||
AppPublisher=The Qucs-S Team
|
AppPublisher=The Qucs-S Team
|
||||||
AppPublisherURL={# URL}
|
AppPublisherURL={#URL}
|
||||||
AppSupportURL={# URL}
|
AppSupportURL={#URL}
|
||||||
AppUpdatesURL={# URL}
|
AppUpdatesURL={#URL}
|
||||||
DefaultDirName={pf}\Qucs-S
|
DefaultDirName={pf}\Qucs-S
|
||||||
DefaultGroupName=Qucs-S
|
DefaultGroupName=Qucs-S
|
||||||
AllowNoIcons=yes
|
AllowNoIcons=yes
|
||||||
LicenseFile={# TREE}\misc\gpl.rtf
|
LicenseFile={#TREE}\misc\gpl.rtf
|
||||||
OutputBaseFilename={# APPNAME}-{# RELEASE}-setup
|
OutputBaseFilename={#APPNAME}-{#RELEASE}-setup
|
||||||
Compression=lzma2/max
|
Compression=lzma2/max
|
||||||
SolidCompression=yes
|
SolidCompression=yes
|
||||||
ChangesEnvironment=yes
|
ChangesEnvironment=yes
|
||||||
UsePreviousAppDir=yes
|
UsePreviousAppDir=yes
|
||||||
WizardStyle=modern
|
WizardStyle=modern
|
||||||
SetupIconFile={# TREE}\misc\qucs.ico
|
SetupIconFile={#TREE}\misc\qucs.ico
|
||||||
|
Uninstallable=yes
|
||||||
; [Registry]
|
|
||||||
; Root: HKLM; Subkey: SYSTEM\CurrentControlSet\Control\Session Manager\Environment; ValueType: string; ValueName: QUCSDIR; ValueData: "{app}"; Flags: deletevalue createvalueifdoesntexist noerror; MinVersion: 0,4.00.1381
|
|
||||||
|
|
||||||
[Tasks]
|
[Tasks]
|
||||||
Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked
|
Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked
|
||||||
|
|
||||||
[Files]
|
[Files]
|
||||||
Source: "{# TREE}\bin\*"; DestDir: "{app}\bin"; Flags: ignoreversion recursesubdirs createallsubdirs
|
Source: "{#TREE}\bin\*"; DestDir: "{app}\bin"; Flags: ignoreversion recursesubdirs createallsubdirs
|
||||||
; Source: "{# TREE}\include\*"; DestDir: "{app}\include"; Flags: ignoreversion recursesubdirs createallsubdirs
|
Source: "{#TREE}\misc\*"; DestDir: "{app}\misc"; Flags: ignoreversion recursesubdirs createallsubdirs
|
||||||
; Source: "{# TREE}\lib\*"; DestDir: "{app}\lib"; Flags: ignoreversion recursesubdirs createallsubdirs
|
Source: "{#TREE}\lib\*"; DestDir: "{app}\lib"; Flags: ignoreversion recursesubdirs createallsubdirs
|
||||||
Source: "{# TREE}\misc\*"; DestDir: "{app}\misc"; Flags: ignoreversion recursesubdirs createallsubdirs
|
Source: "{#TREE}\share\*"; DestDir: "{app}\share"; Flags: ignoreversion recursesubdirs createallsubdirs
|
||||||
Source: "{# TREE}\lib\*"; DestDir: "{app}\lib"; Flags: ignoreversion recursesubdirs createallsubdirs
|
|
||||||
Source: "{# TREE}\share\*"; DestDir: "{app}\share"; Flags: ignoreversion recursesubdirs createallsubdirs
|
|
||||||
|
|
||||||
[Icons]
|
[Icons]
|
||||||
Name: "{group}\Qucs-S Simulator"; Filename: "{app}\bin\qucs-s.exe"; IconFilename: "{app}\misc\qucs.ico"; WorkingDir: "{app}\bin"
|
Name: "{group}\Qucs-S Simulator"; Filename: "{app}\bin\qucs-s.exe"; IconFilename: "{app}\misc\qucs.ico"; WorkingDir: "{app}\bin"
|
||||||
@ -70,3 +66,16 @@ Name: "{group}\Technical Online Documentation"; Filename: "{app}\misc\docsite.ur
|
|||||||
Name: "{group}\{cm:UninstallProgram,Qucs}"; Filename: "{uninstallexe}"
|
Name: "{group}\{cm:UninstallProgram,Qucs}"; Filename: "{uninstallexe}"
|
||||||
Name: "{userdesktop}\Qucs-S"; Filename: "{app}\bin\qucs-s.exe"; IconFilename: "{app}\misc\qucs.ico"; WorkingDir: "{app}\bin"; Tasks: desktopicon
|
Name: "{userdesktop}\Qucs-S"; Filename: "{app}\bin\qucs-s.exe"; IconFilename: "{app}\misc\qucs.ico"; WorkingDir: "{app}\bin"; Tasks: desktopicon
|
||||||
|
|
||||||
|
[Code]
|
||||||
|
procedure CurStepChanged(CurStep: TSetupStep);
|
||||||
|
var
|
||||||
|
ResultCode: Integer;
|
||||||
|
Uninstall: String;
|
||||||
|
begin
|
||||||
|
if (CurStep = ssInstall) then begin
|
||||||
|
if RegQueryStringValue(HKLM, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\{#APPNAME}_is1', 'UninstallString', Uninstall) then begin
|
||||||
|
MsgBox('An existing version of {#APPNAME} was detected. It will now be removed before installing the new version.', mbInformation, MB_OK);
|
||||||
|
Exec(RemoveQuotes(Uninstall), ' /SILENT', '', SW_SHOWNORMAL, ewWaitUntilTerminated, ResultCode);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
Loading…
x
Reference in New Issue
Block a user