source: sasview/sansview/installer_new.iss @ ea1012b

ESS_GUIESS_GUI_DocsESS_GUI_batch_fittingESS_GUI_bumps_abstractionESS_GUI_iss1116ESS_GUI_iss879ESS_GUI_iss959ESS_GUI_openclESS_GUI_orderingESS_GUI_sync_sascalccostrafo411magnetic_scattrelease-4.1.1release-4.1.2release-4.2.2release_4.0.1ticket-1009ticket-1094-headlessticket-1242-2d-resolutionticket-1243ticket-1249ticket885unittest-saveload
Last change on this file since ea1012b was d4c19e5, checked in by Jae Cho <jhjcho@…>, 13 years ago

fixing setup_exe-ing of sansview app

  • Property mode set to 100644
File size: 5.4 KB
Line 
1
2; Script generated by the Inno Setup Script Wizard
3
4; and local_config.py located in this directory.
5 ; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!
6[Setup]
7
8ChangesAssociations=yes
9AppName=SansView
10AppVerName=SansView-1.9.2dev_AUG
11AppPublisher=(c) 2009, University of Tennessee
12AppPublisherURL=http://danse.chem.utk.edu
13AppSupportURL=http://danse.chem.utk.edu
14AppUpdatesURL=http://danse.chem.utk.edu
15ChangesEnvironment=true
16DefaultDirName={pf}\SansView-Dev
17DefaultGroupName=DANSE\SansView-1.9.2dev_AUG
18DisableProgramGroupPage=yes
19LicenseFile=license.txt
20OutputBaseFilename=setupSansView
21SetupIconFile=images\ball.ico
22Compression=lzma
23SolidCompression=yes
24PrivilegesRequired=none
25
26
27[Registry]
28Root: HKCR;     Subkey: ".txt\openwithlist\SansView.exe"; Flags: uninsdeletekey noerror
29Root: HKCR;     Subkey: ".xml\openwithlist\SansView.exe"; Flags: uninsdeletekey noerror
30Root: HKCR;     Subkey: ".tif\openwithlist\SansView.exe"; Flags: uninsdeletekey noerror
31Root: HKCR;     Subkey: ".tiff\openwithlist\SansView.exe"; Flags: uninsdeletekey noerror
32Root: HKCR;     Subkey: ".asc\openwithlist\SansView.exe"; Flags: uninsdeletekey noerror
33Root: HKCR;     Subkey: ".dat\openwithlist\SansView.exe"; Flags: uninsdeletekey noerror
34Root: HKCR;     Subkey: ".sans\openwithlist\SansView.exe"; Flags: uninsdeletekey noerror
35Root: HKCR; Subkey: "applications\SansView.exe\shell\open\command";     ValueType: string; ValueName: "";       ValueData: """{app}\SansView.exe""  ""%1""" ; Flags: uninsdeletevalue noerror
36Root: HKCU;     Subkey: "Software\Classes\.txt\OpenWithList\SansView.exe"; Flags: uninsdeletekey noerror
37Root: HKCU;     Subkey: "Software\Classes\.xml\openwithlist\SansView.exe"; Flags: uninsdeletekey noerror
38Root: HKCU;     Subkey: "Software\Classes\.asc\openwithlist\SansView.exe"; Flags: uninsdeletekey noerror
39Root: HKCU;     Subkey: "Software\Classes\.dat\openwithlist\SansView.exe"; Flags: uninsdeletekey noerror
40Root: HKCU;     Subkey: "Software\Classes\.tif\openwithlist\SansView.exe"; Flags: uninsdeletekey noerror
41Root: HKCU;     Subkey: "Software\Classes\.tiff\openwithlist\SansView.exe"; Flags: uninsdeletekey noerror
42Root: HKCU;     Subkey: "Software\Classes\.sans\openwithlist\SansView.exe"; Flags: uninsdeletekey noerror
43Root: HKCU; Subkey: "Software\Classes\applications\SansView.exe\shell\open\command";    ValueType: string; ValueName: "";       ValueData: """{app}\SansView.exe""  ""%1""" ; Flags: uninsdeletevalue noerror
44Root: HKCR;     Subkey: ".svs"; ValueType: string;      ValueName: "";  ValueData: "{app}\SansView.exe";         Flags: uninsdeletevalue
45Root: HKCR;     Subkey: ".fitv"; ValueType: string;     ValueName: "";  ValueData: "{app}\SansView.exe";         Flags: uninsdeletevalue
46Root: HKCR;     Subkey: ".inv"; ValueType: string;      ValueName: "";  ValueData: "{app}\SansView.exe";         Flags: uninsdeletevalue
47Root: HKCR;     Subkey: ".prv"; ValueType: string;      ValueName: "";  ValueData: "{app}\SansView.exe";         Flags: uninsdeletevalue
48Root: HKCR; Subkey: "{app}\SansView.exe"; ValueType: string; ValueName: ""; ValueData: "SansView File"; Flags: uninsdeletekey
49Root: HKCR; Subkey: "{app}\SansView.exe\shell\open\command";    ValueType: string; ValueName: "";       ValueData: """{app}\SansView.exe""  ""%1""" ; Flags: uninsdeletevalue noerror
50Root: HKCR; Subkey: "{app}\images\ball.ico";    ValueType: string; ValueName: "";       ValueData: "{app}\SansView.exe,0"
51Root: HKLM; Subkey: "SYSTEM\CurrentControlSet\Control\Session Manager\Environment";     ValueType: expandsz; ValueName: "SANSVIEWPATH"; ValueData: "{app}";      Flags: uninsdeletevalue
52; Write to PATH (below) is disabled; need more work
53;Root: HKCU; Subkey: "Environment";     ValueType: expandsz; ValueName: "PATH"; ValueData: "%SANSVIEWPATH%;{olddata}";   Check: NeedsAddPath()
54
55
56[Languages]
57Name: "english";        MessagesFile: "compiler:Default.isl"
58
59
60[Tasks]
61Name: "desktopicon";    Description: "{cm:CreateDesktopIcon}";  GroupDescription: "{cm:AdditionalIcons}";       Flags: unchecked
62
63
64
65[Files]
66Source: "dist\SansView.exe";    DestDir: "{app}";       Flags: ignoreversion
67Source: "dist\*";       DestDir: "{app}";       Flags: ignoreversion recursesubdirs createallsubdirs
68Source: "images\*";     DestDir: "{app}\images";        Flags: ignoreversion recursesubdirs createallsubdirs
69Source: "media\*";      DestDir: "{app}\media"; Flags: ignoreversion recursesubdirs createallsubdirs
70Source: "test\*";       DestDir: "{app}\test";  Flags: ignoreversion recursesubdirs createallsubdirs
71;       NOTE: Don't use "Flags: ignoreversion" on any shared system files
72
73[Icons]
74Name: "{group}\SansView";       Filename: "{app}\SansView.exe"; WorkingDir: "{app}"
75Name: "{group}\{cm:UninstallProgram, SansView}";         Filename: "{uninstallexe}"
76Name: "{commondesktop}\SansView-1.9.2dev_AUG";  Filename: "{app}\SansView.exe"; Tasks: desktopicon; WorkingDir: "{app}"
77
78
79[Run]
80Filename: "{app}\SansView.exe"; Description: "{cm:LaunchProgram, SansView}";    Flags: nowait postinstall skipifsilent
81
82
83[Code]
84function NeedsAddPath(): boolean;
85var
86  oldpath: string;
87  newpath: string;
88  pathArr:    TArrayOfString;
89  i:        Integer;
90begin
91  RegQueryStringValue(HKEY_CURRENT_USER,'Environment','PATH', oldpath)
92  oldpath := oldpath + ';';
93  newpath := '%SANSVIEWPATH%';
94  i := 0;
95  while (Pos(';', oldpath) > 0) do begin
96    SetArrayLength(pathArr, i+1);
97    pathArr[i] := Copy(oldpath, 0, Pos(';', oldpath)-1);
98    oldpath := Copy(oldpath, Pos(';', oldpath)+1, Length(oldpath));
99    i := i + 1;
100    // Check if current directory matches app dir
101    if newpath = pathArr[i-1]
102    then begin
103      Result := False;
104      exit;
105    end;
106  end;
107  Result := True;
108end;
109
Note: See TracBrowser for help on using the repository browser.