Revision 479e9af2 trunk/Pithos.Installer/PithosPlus.iss
b/trunk/Pithos.Installer/PithosPlus.iss | ||
---|---|---|
14 | 14 |
[Setup] |
15 | 15 |
;WARNING: DO NOT CHANGE THE APP ID (AppId) or the update will not work correctly. |
16 | 16 |
;AppId is used to check if we are installed using this isntaller and not by other means. |
17 |
AppId={{926354B2-04D2-47CF-8FAA-04AB3682008B}}
|
|
17 |
AppID={{926354B2-04D2-47CF-8FAA-04AB3682008B}}
|
|
18 | 18 |
AppName={#MyAppName} |
19 | 19 |
AppVersion={#MyAppVersion} |
20 | 20 |
AppVerName={#MyAppName} {#MyAppVersion} |
... | ... | |
25 | 25 |
AppUpdatesURL={#MyAppURL} |
26 | 26 |
DefaultDirName={pf}\PithosPlus |
27 | 27 |
DefaultGroupName={#MyAppName} |
28 |
AllowNoIcons=yes
|
|
28 |
AllowNoIcons=true
|
|
29 | 29 |
LicenseFile=Licenses\GRNET License.txt |
30 | 30 |
OutputBaseFilename=PithosPlus_Setupv{#MyAppVersion} |
31 |
SolidCompression=True
|
|
32 |
UsePreviousSetupType=True
|
|
33 |
UsePreviousTasks=True
|
|
31 |
SolidCompression=true
|
|
32 |
UsePreviousSetupType=true
|
|
33 |
UsePreviousTasks=true
|
|
34 | 34 |
UsePreviousLanguage=True |
35 |
ShowTasksTreeLines=True
|
|
35 |
ShowTasksTreeLines=true
|
|
36 | 36 |
AppCopyright=(c) 2011 - 2012 GRNET |
37 |
PrivilegesRequired=none
|
|
38 |
EnableDirDoesntExistWarning=True
|
|
37 |
PrivilegesRequired=admin
|
|
38 |
EnableDirDoesntExistWarning=true
|
|
39 | 39 |
DirExistsWarning=yes |
40 | 40 |
AppContact=support@okeanos.grnet.gr |
41 | 41 |
AppSupportPhone=+30 210 0000000 |
42 | 42 |
AppReadmeFile=My Readme |
43 |
UninstallDisplayIcon={app}\Pithos.exe |
|
43 |
UninstallDisplayIcon={app}\PithosPlus.exe
|
|
44 | 44 |
WizardImageFile=Images\ppWZDImage.bmp |
45 | 45 |
WizardSmallImageFile=Images\ppWZDSmall.bmp |
46 | 46 |
VersionInfoVersion={#MyAppVersion} |
47 | 47 |
MinVersion=0,5.01sp3 |
48 | 48 |
ArchitecturesInstallIn64BitMode=x64 |
49 |
AppMutex=PITHOSMUTEX |
|
50 |
OutputDir={tmp} |
|
51 |
SetupLogging=true |
|
52 |
UninstallLogMode=append |
|
53 |
VersionInfoCompany=GRNET |
|
54 |
VersionInfoDescription=Pithos Plus |
|
55 |
VersionInfoCopyright=(c) 2011-2012 GRNET |
|
56 |
VersionInfoProductName=Pitho Plus |
|
57 |
VersionInfoProductVersion=1 |
|
58 |
AppModifyPath="{app}\UninsHs.exe" /m0=AppId |
|
49 | 59 |
|
50 | 60 |
[Languages] |
51 | 61 |
Name: "english"; MessagesFile: "compiler:Default.isl" |
... | ... | |
65 | 75 |
[Files] |
66 | 76 |
; NOTE: Don't use "Flags: ignoreversion" on any shared system files |
67 | 77 |
; Executable |
68 |
Source: "..\Pithos.Client.WPF\bin\Debug\PithosPlus.exe"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
69 |
Source: "..\Pithos.Client.WPF\bin\Debug\PithosPlus.exe.config"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
78 |
Source: "..\Pithos.Client.WPF\bin\Debug\PithosPlus.exe"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Tasks: desktopicon; Languages: english french german spanish greek |
|
79 |
Source: "..\Pithos.Client.WPF\bin\Debug\PithosPlus.exe.config"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
80 |
; Appearance |
|
81 |
Source: "Skin\ISSkin.dll"; DestDir: {app}; Flags: dontcopy |
|
82 |
Source: "Skin\GRNETWhite.cjstyles"; DestDir: {tmp}; Flags: dontcopy |
|
83 |
; Repair/Modify |
|
84 |
Source: "Tools\UninsHs.exe"; DestDir: "{app}"; Flags: restartreplace |
|
85 |
; Running Processes |
|
86 |
Source: "Tools\IssProc.dll"; DestDir: {tmp}; Flags: dontcopy |
|
70 | 87 |
; DLL |
71 |
Source: "..\Pithos.ShellExtensions\bin\x86\Debug\Pithos.ShellExtensions.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek; Check: not Is64BitInstallMode |
|
72 |
Source: "..\Pithos.ShellExtensions\bin\x64\Debug\Pithos.ShellExtensions.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek; Check: Is64BitInstallMode |
|
73 |
Source: "..\Pithos.Client.WPF\bin\Debug\AppLimit.NetSparkle.Net40.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
74 |
Source: "..\Pithos.Client.WPF\bin\Debug\AsyncCtpLibrary.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
75 |
Source: "..\Pithos.Client.WPF\bin\Debug\Caliburn.Micro.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
76 |
Source: "..\Pithos.Client.WPF\bin\Debug\Castle.ActiveRecord.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
77 |
Source: "..\Pithos.Client.WPF\bin\Debug\Castle.Components.Validator.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
78 |
Source: "..\Pithos.Client.WPF\bin\Debug\Castle.Core.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
79 |
Source: "..\Pithos.Client.WPF\bin\Debug\Hardcodet.Wpf.TaskbarNotification.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
80 |
Source: "..\Pithos.Client.WPF\bin\Debug\Iesi.Collections.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
81 |
Source: "..\Pithos.Client.WPF\bin\Debug\log4net.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
82 |
Source: "..\Pithos.Client.WPF\bin\Debug\Newtonsoft.Json.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
83 |
Source: "..\Pithos.Client.WPF\bin\Debug\NHibernate.ByteCode.Castle.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
84 |
Source: "..\Pithos.Client.WPF\bin\Debug\NHibernate.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
85 |
Source: "..\Pithos.Client.WPF\bin\Debug\NHibernate.Search.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
86 |
Source: "..\Pithos.Client.WPF\bin\Debug\ParallelExtensionsExtras.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
87 |
Source: "..\Pithos.Client.WPF\bin\Debug\Pithos.Core.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
88 |
Source: "..\Pithos.Client.WPF\bin\Debug\Pithos.Interfaces.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
89 |
Source: "..\Pithos.Client.WPF\bin\Debug\Pithos.Network.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
90 |
Source: "..\Pithos.Client.WPF\bin\Debug\System.Data.SQLite.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
91 |
Source: "..\Pithos.Client.WPF\bin\Debug\System.Threading.Tasks.Dataflow.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
92 |
Source: "..\Pithos.Client.WPF\bin\Debug\System.Windows.Interactivity.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
93 |
Source: "..\Pithos.Client.WPF\bin\Debug\WPFToolkit.Extended.dll"; DestDir: "{app}"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
|
88 |
Source: "..\Pithos.ShellExtensions\bin\x86\Debug\Pithos.ShellExtensions.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek; Check: not Is64BitInstallMode
|
|
89 |
Source: "..\Pithos.ShellExtensions\bin\x64\Debug\Pithos.ShellExtensions.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek; Check: Is64BitInstallMode
|
|
90 |
Source: "..\Pithos.Client.WPF\bin\Debug\AppLimit.NetSparkle.Net40.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
91 |
Source: "..\Pithos.Client.WPF\bin\Debug\AsyncCtpLibrary.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
92 |
Source: "..\Pithos.Client.WPF\bin\Debug\Caliburn.Micro.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
93 |
Source: "..\Pithos.Client.WPF\bin\Debug\Castle.ActiveRecord.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
94 |
Source: "..\Pithos.Client.WPF\bin\Debug\Castle.Components.Validator.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
95 |
Source: "..\Pithos.Client.WPF\bin\Debug\Castle.Core.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
96 |
Source: "..\Pithos.Client.WPF\bin\Debug\Hardcodet.Wpf.TaskbarNotification.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
97 |
Source: "..\Pithos.Client.WPF\bin\Debug\Iesi.Collections.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
98 |
Source: "..\Pithos.Client.WPF\bin\Debug\log4net.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
99 |
Source: "..\Pithos.Client.WPF\bin\Debug\Newtonsoft.Json.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
100 |
Source: "..\Pithos.Client.WPF\bin\Debug\NHibernate.ByteCode.Castle.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
101 |
Source: "..\Pithos.Client.WPF\bin\Debug\NHibernate.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
102 |
Source: "..\Pithos.Client.WPF\bin\Debug\NHibernate.Search.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
103 |
Source: "..\Pithos.Client.WPF\bin\Debug\ParallelExtensionsExtras.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
104 |
Source: "..\Pithos.Client.WPF\bin\Debug\Pithos.Core.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
105 |
Source: "..\Pithos.Client.WPF\bin\Debug\Pithos.Interfaces.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
106 |
Source: "..\Pithos.Client.WPF\bin\Debug\Pithos.Network.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
107 |
Source: "..\Pithos.Client.WPF\bin\Debug\System.Data.SQLite.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
108 |
Source: "..\Pithos.Client.WPF\bin\Debug\System.Threading.Tasks.Dataflow.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
109 |
Source: "..\Pithos.Client.WPF\bin\Debug\System.Windows.Interactivity.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
110 |
Source: "..\Pithos.Client.WPF\bin\Debug\WPFToolkit.Extended.dll"; DestDir: "{app}"; Flags: restartreplace ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek
|
|
94 | 111 |
; Tortoise |
95 | 112 |
Source: "TortoiseOverlays\License.txt"; DestDir: "{cf}/\TortoiseOverlays"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
96 |
Source: "TortoiseOverlays\x86\TortoiseOverlays.dll"; DestDir: "{cf}/\TortoiseOverlays"; Components: RequiredFiles; Languages: english french german spanish greek; Check: not Is64BitInstallMode |
|
97 |
Source: "TortoiseOverlays\x64\TortoiseOverlays.dll"; DestDir: "{cf}/\TortoiseOverlays"; Components: RequiredFiles; Languages: english french german spanish greek; Check: Is64BitInstallMode |
|
113 |
Source: "TortoiseOverlays\x86\TortoiseOverlays.dll"; DestDir: "{cf}/\TortoiseOverlays"; Flags: restartreplace; Components: RequiredFiles; Languages: english french german spanish greek; Check: not Is64BitInstallMode
|
|
114 |
Source: "TortoiseOverlays\x64\TortoiseOverlays.dll"; DestDir: "{cf}/\TortoiseOverlays"; Flags: restartreplace; Components: RequiredFiles; Languages: english french german spanish greek; Check: Is64BitInstallMode
|
|
98 | 115 |
Source: "TortoiseOverlays\icons\XPStyle\*"; DestDir: "{cf}/\TortoiseOverlays/icons/\XPStyle"; Flags: ignoreversion; Components: RequiredFiles; Languages: english french german spanish greek |
99 | 116 |
;Redistributables |
100 | 117 |
Source: "Redistributables\*"; DestDir: "{tmp}"; Flags: ignoreversion deleteafterinstall |
... | ... | |
110 | 127 |
Name: "{group}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}" |
111 | 128 |
Name: "{group}\{cm:ProgramOnTheWeb,{#MyAppName}}"; Filename: "{#MyAppURL}" |
112 | 129 |
Name: "{group}\{cm:ProgramOnTheWeb,GRNET}"; Filename: "{#MyURL}" |
113 |
Name: "{group}\{cm:UninstallProgram,{#MyAppName}}"; Filename: "{uninstallexe}" |
|
130 |
;Name: "{group}\{cm:UninstallProgram,{#MyAppName}}"; Filename: "{uninstallexe}" |
|
131 |
Name: "{group}\Uninstall {#MyAppName}"; Filename: "{app}\UninsHs.exe"; Parameters: /u0=AppId |
|
114 | 132 |
Name: "{commonstartup}\{#MyStartupName}"; Filename: "{app}\{#MyAppExeName}"; Parameters: "startup" |
115 | 133 |
Name: "{commondesktop}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"; Tasks: desktopicon |
116 | 134 |
;Name: "{userappdata}\Microsoft\Internet Explorer\Quick Launch\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"; Tasks: quicklaunchicon |
... | ... | |
231 | 249 |
Root: "HKCR"; Subkey: "CLSID\{{EAD1663B-9A03-4E92-80D3-B01B981CD828}\InprocServer32\1.0.0.0"; ValueType: String; ValueName: "CodeBase"; ValueData: "{app}\Pithos.ShellExtensions.dll"; |
232 | 250 |
Root: "HKCR"; Subkey: "CLSID\{{EAD1663B-9A03-4E92-80D3-B01B981CD828}\InprocServer32\1.0.0.0"; ValueType: String; ValueName: "RuntimeVersion"; ValueData: "v4.0.30319"; Components: RequiredFiles |
233 | 251 |
Root: "HKCR"; Subkey: "CLSID\{{EAD1663B-9A03-4E92-80D3-B01B981CD828}\ProgId"; ValueType: String; ValueName: "(Default)"; ValueData: "Pithos.ShellExtensions.Overlays.AddedIcodOverlay"; |
234 |
;Root: "HKCR"; Subkey: "Software\Classes\CLSID\{{C5994560-53D9-4125-87C9-F193FC689CB2}"; ValueType: "String"; ValueData: "*"; |
|
235 |
;Root: "HKCR"; Subkey: "Software\Classes\CLSID\{{C5994560-53D9-4125-87C9-F193FC689CB2}"; ValueType: "String"; ValueData: "TortoiseSVN"; |
|
236 |
;Root: "HKCR"; Subkey: "Software\Classes\CLSID\{{C5994560-53D9-4125-87C9-F193FC689CB2}\InProcServer32"; ValueType: "String"; ValueData: "ThreadingModel"; |
|
237 |
;Root: "HKCR"; Subkey: "Software\Classes\CLSID\{{C5994560-53D9-4125-87C9-F193FC689CB2}\InProcServer32"; ValueType: "String"; ValueData: "[CommonFilesFolder.9D3DBC93_494B_45A8_88D7_430AB5568B0F]TortoiseOverlays\TortoiseOverlays.dll"; |
|
252 |
|
|
238 | 253 |
Root: "HKCR"; Subkey: "Directory\Background\shellex\ContextMenuHandlers\Pithos.FileContextMenu"; ValueType: String; ValueData: "{{b1f1405d-94a1-4692-b72f-fc8caf8b8700}"; |
239 | 254 |
Root: "HKCR"; Subkey: "Directory\shellex\ContextMenuHandlers\Pithos.FileContextMenu"; ValueType: String; ValueData: "{{b1f1405d-94a1-4692-b72f-fc8caf8b8700}"; |
240 | 255 |
Root: "HKCR"; Subkey: "Pithos.ShellExtensions.FileContextMenu"; ValueType: String; ValueData: "Pithos.ShellExtensions.Menus.FileContextMenu"; |
... | ... | |
297 | 312 |
ChkBox: TCheckBox; |
298 | 313 |
LicenseID: Integer; |
299 | 314 |
|
315 |
// IssFindModule called on in/uninstall |
|
316 |
function IssFindModule(hWnd: Integer; Modulename: String; Language: PAnsiChar; Silent: Boolean; CanIgnore: Boolean ): Integer; |
|
317 |
external 'IssFindModuleW@files:IssProc.dll stdcall setuponly'; |
|
318 |
|
|
319 |
function IssFindModuleU(hWnd: Integer; Modulename: String; Language: PAnsiChar; Silent: Boolean; CanIgnore: Boolean ): Integer; |
|
320 |
external 'IssFindModuleW@{app}\IssProc.dll stdcall uninstallonly'; |
|
321 |
|
|
322 |
//Call this to enable search for any in use file type |
|
323 |
function IssEnableAnyFileInUseCheck(Folder: String): Integer; |
|
324 |
external 'IssEnableAnyFileInUseCheckW@files:IssProc.dll stdcall setuponly'; |
|
325 |
|
|
326 |
//IssEnableAnyFileInUseCheck called on uninstall |
|
327 |
function IssEnableAnyFileInUseCheckU(Folder: String): Integer; |
|
328 |
external 'IssEnableAnyFileInUseCheckW@{app}\IssProc.dll stdcall uninstallonly'; |
|
329 |
|
|
330 |
//Register for commercial use on install |
|
331 |
function IssRegister(rName: PAnsiChar; rKey: PAnsiChar): Integer; |
|
332 |
external 'IssRegister@files:IssProc.dll stdcall setuponly'; |
|
333 |
|
|
334 |
//Register for commercial use on uninstall |
|
335 |
function IssRegisterU(rName: PAnsiChar; rKey: PAnsiChar): Integer; |
|
336 |
external 'IssRegister@{app}\IssProc.dll stdcall uninstallonly'; |
|
337 |
|
|
338 |
// Importing LoadSkin API from ISSkin.DLL |
|
339 |
procedure LoadSkin(lpszPath: String; lpszIniFileName: String); |
|
340 |
external 'LoadSkin@files:isskin.dll stdcall'; |
|
341 |
|
|
342 |
procedure UnloadSkin(); |
|
343 |
external 'UnloadSkin@files:isskin.dll stdcall'; |
|
344 |
|
|
345 |
// Importing ShowWindow Windows API from User32.DLL |
|
346 |
function ShowWindow(hWnd: Integer; uType: Integer): Integer; |
|
347 |
external 'ShowWindow@user32.dll stdcall'; |
|
348 |
|
|
300 | 349 |
function IsDotNetDetected(version: string; service: cardinal): boolean; |
301 | 350 |
// 'v1.1.4322' .NET Framework 1.1 |
302 | 351 |
// 'v2.0.50727' .NET Framework 2.0 |
... | ... | |
330 | 379 |
result := success and (install = 1) and (serviceCount >= service); |
331 | 380 |
end; |
332 | 381 |
|
382 |
function NextButtonClick(CurPage: Integer): Boolean; |
|
383 |
var |
|
384 |
hWnd: Integer; |
|
385 |
sModuleName: String; |
|
386 |
nCode: Integer; {IssFindModule returns: 0 if no module found; 1 if cancel pressed; 2 if ignore pressed; -1 if an error occured } |
|
387 |
begin |
|
388 |
Result := true; |
|
389 |
|
|
390 |
if CurPage = wpReady then |
|
391 |
begin |
|
392 |
Result := false; |
|
393 |
|
|
394 |
hWnd := StrToInt(ExpandConstant('{wizardhwnd}')); { get main wizard handle } |
|
395 |
IssEnableAnyFileInUseCheck(ExpandConstant('{app}')); |
|
396 |
sModuleName :=ExpandConstant('{app}*;pithos*.exe;PithosPlus.exe'); |
|
397 |
|
|
398 |
nCode:=IssFindModule(hWnd,sModuleName,'en',false,true); { search for module and display files-in-use window if found } |
|
399 |
|
|
400 |
if nCode=1 then begin { cancel pressed or files-in-use window closed } |
|
401 |
PostMessage (WizardForm.Handle, $0010, 0, 0); { quit setup, $0010=WM_CLOSE } |
|
402 |
end else if (nCode=0) or (nCode=2) then begin { no module found or ignored pressed} |
|
403 |
Result := true; { continue setup } |
|
404 |
end; |
|
405 |
|
|
406 |
end; |
|
407 |
|
|
408 |
end; |
|
409 |
|
|
333 | 410 |
function InitializeSetup(): Boolean; |
334 | 411 |
begin |
335 |
// Test the presence of .NET 4.0 |
|
336 |
if (not(RegKeyExists(HKLM, 'SOFTWARE\Microsoft\NET Framework Setup\NDP\v4'))) then |
|
337 |
dotNET40Missing := True; |
|
412 |
//Unpack The Skin |
|
413 |
ExtractTemporaryFile('GRNETWhite.msstyles'); |
|
414 |
LoadSkin(ExpandConstant('{tmp}\GRNETWhite.msstyles'), ''); |
|
415 |
|
|
416 |
// Test the presence of .NET 4.0 |
|
417 |
if (not(RegKeyExists(HKLM, 'SOFTWARE\Microsoft\NET Framework Setup\NDP\v4'))) then |
|
418 |
dotNET40Missing := True; |
|
419 |
|
|
420 |
Result := True; |
|
421 |
end; |
|
338 | 422 |
|
339 |
Result := True; |
|
423 |
procedure DeinitializeSetup(); |
|
424 |
begin |
|
425 |
//Hide Window widget |
|
426 |
ShowWindow(StrToInt(ExpandConstant('{wizardhwnd}')), 0); |
|
427 |
UnloadSkin(); |
|
340 | 428 |
end; |
341 | 429 |
|
342 | 430 |
function ShouldInstalldotNET40(): Boolean; |
... | ... | |
350 | 438 |
IsUpdate := FileExists(ExpandConstant('{app}\{#MyAppExeName}')); |
351 | 439 |
if CurPageID = LicenseID then |
352 | 440 |
Wizardform.NextButton.Enabled := False; |
353 |
|
|
441 |
if (Pos('/SP-', UpperCase(GetCmdTail)) > 0) and (CurPageID = wpSelectComponents) then |
|
442 |
WizardForm.BackButton.Visible := False; |
|
354 | 443 |
end; |
355 | 444 |
|
356 | 445 |
function NotAnUpdate: Boolean; |
... | ... | |
427 | 516 |
ChkBox := TCheckBox.Create(Page); |
428 | 517 |
ChkBox.Top := BitmapImage.Height + Memo.Height; |
429 | 518 |
ChkBox.Width := Page.SurfaceWidth; |
430 |
ChkBox.Caption := 'I Agree with the GRNET licese';
|
|
519 |
ChkBox.Caption := 'I agree with the licese agreement';
|
|
431 | 520 |
ChkBox.Checked := cbUnChecked; |
432 | 521 |
chkBox.OnClick := @LicenseOnClick; |
433 | 522 |
ChkBox.Parent := Page.Surface; |
... | ... | |
467 | 556 |
CreateTheWizardPages; |
468 | 557 |
end; |
469 | 558 |
|
559 |
function ShouldSkipPage(CurPage: Integer): Boolean; |
|
560 |
begin |
|
561 |
if Pos('/SP-', UpperCase(GetCmdTail)) > 0 then |
|
562 |
case CurPage of |
|
563 |
wpLicense, wpPassword, wpInfoBefore, wpUserInfo, |
|
564 |
wpSelectDir, wpSelectProgramGroup, wpInfoAfter: |
|
565 |
Result := True; |
|
566 |
end; |
|
567 |
end; |
|
568 |
|
|
470 | 569 |
[Run] |
471 | 570 |
;Kill Running Task |
472 | 571 |
Filename: cmd; parameters: /c taskkill /f /im pithos.exe;Flags: runhidden |
473 | 572 |
Filename: cmd; parameters: /c taskkill /f /im pithos.client.WPF.exe;Flags: runhidden |
474 | 573 |
;Launch Redist |
475 |
Filename: {tmp}\dotNetFx40_Client_setup.exe; Description: Install Microsoft .Net Framework 4.0; Parameters: /q /noreboot; Flags: skipifdoesntexist; Check: ShouldInstalldotNET40 |
|
574 |
Filename: {tmp}\dotNetFx40_Client_setup.exe; Description: Install Microsoft .Net Framework 4.0; Parameters: /q /noreboot; Flags: skipifdoesntexist; Check: ShouldInstalldotNET40 |
|
575 |
Filename: {app}\UninsHs.exe; Parameters: /r0=AppId,{language},{srcexe}; Flags: runminimized |
Also available in: Unified diff