OSDN Git Service

Installer: - Use downloaded files
[winmerge-jp/winmerge-jp.git] / Installer / InnoSetup / WinMerge.iss
1 ;           Programmed by:  Christian Blackburn, Christian List, Kimmo Varis,\r
2 ;                 Purpose:  The is the Inno Setup installation script for distributing our WinMerge application.\r
3 ; Tools Needed To Compile:  Inno Setup 5.1.7+ (http://www.jrsoftware.org/isdl.php), Inno Setup QuickStart Pack 5.1.7+(http://www.jrsoftware.org/isdl.php)\r
4 ;                           note: the versions of Inno Setup and the QuickStart Pack should be identical to ensure proper function\r
5 ;Directly Dependant Files:  Because this is an installer. It would be difficult to list and maintain each of the files referenced\r
6 ;                           throughout the script in the header.  If you search this plain text script for a particular file in our Subversio repository and it\r
7 ;                           doesn't appear then this script is not directly dependant on that file.\r
8 ;Compilation Instructions:  1.  Open this file in Inno Setup or ISTool\r
9 ;                           2.  Make sure Compression=LZMA/Ultra, InternalCompressLevel=Ultra, and SolidCompression=True these values are lowered during\r
10 ;                               development to speed up compilation, however at release we want the intaller to be as strong as possible.\r
11 ;                           3. Check all files are present:\r
12 ;                                   -From ISTool Click\r
13 ;                           4.  Compile the script: "Project" --> "Verify Files..."\r
14 ;                                   -From Inno Setup "Click "Build" --> "Compile"\r
15 ;                                   -From ISTool Click "Project" --> "Compile Setup"\r
16 ;                           5.  The compiled installer will appear in the \InnoSetup\Output\ directory at currently should be around 1.5MBs in size.\r
17 ;\r
18 ; Installer To Do List:\r
19 ; #  Make the Install7ZipDll() Function automatically work with future versions of Merge7zDLL (Use GetCurentFileName)\r
20 ; #  Provide the option to or not to assign the Ctrl+Alt+M accelerator to WinMerge., make sure it's turned on for at least one icon\r
21 ; #  Add WinMerge to the user's path so they can execute comparison's from a Dos Prompt (Cmd.exe/Command.exe)\r
22 ; #  We need to unregister, and delete the ShellExtension Dll if the user doesn't want it, during installation\r
23 \r
24 ; #  Display integration options in gray rather than hiding them if the user doesn't have the application in question installed\r
25 ; #  We need to ask those that have the RCLLocalization.dll in their plugins folder if they actually want it, their answer will need to be stored in the registry\r
26 ; #  Write code to detect "\Programs\WinMerge\WinMerge" type start menu installs\r
27 ;\r
28 ; Custom Installer Pages:\r
29 ; #  Bundle 7-Zip with WinMerge or provide on the fly download capability.\r
30 ; #  Allow users to set their working directory via a custom installer page\r
31 ;\r
32 ; Things that make the user's life easier:\r
33 ; #  Create instructions and a sample language file using the Inno Setup Translator Tool (http://www2.arnes.si/~sopjsimo/translator.html)\r
34 ; #  Add "WinMerge is running would you like to close it now?" support with programmatic termination\r
35 ;     -Note: We'll need to add a declares statement to our ISX code so that we can use FindWindowEx directly or a mutex search or two\r
36 ; #  Rather than requiring users to restart we could just kill all intances of Explorer.exe, but we'll need to prompt the user first and restart it\r
37 ;    once the ShellExtension.dll file has been added or removed.\r
38 ;\r
39 ; Non-Essential Features:\r
40 ; #  See about getting a higher resolution copy of the Users's Guide.ico source art from somebody (A 32x32, and or 48x48 would be nice)\r
41 ; #  Using the registry set the order our icons appear within their group in the start menu.:\r
42 ;      1.  WinMerge\r
43 ;      2.  Read Me\r
44 ;      3.  Users's Guide\r
45 ;      4.  WinMerge on the Web\r
46 ;      5.  Uninstall WinMerge\r
47 ; #  Create the ability to install to two start menu groups simultaneously\r
48 ;\r
49 ; Not yet possible (Limited by Inno Setup):\r
50 ; #  While uninstalling prompt the user as to whether or not they'd like to remove their WinMerge preferences too?\r
51 \r
52 #define AppVersion GetFileVersion(SourcePath + "\..\..\Build\MergeUnicodeRelease\WinMergeU.exe")\r
53 #define FriendlyAppVersion Copy(GetFileVersion(SourcePath + "\..\..\Build\MergeUnicodeRelease\WinMergeU.exe"), 1, 5)\r
54 #define VS120COMNTOOLS GetEnv('VS120COMNTOOLS')\r
55 #define VS140COMNTOOLS GetEnv('VS140COMNTOOLS')\r
56 \r
57 [Setup]\r
58 AppName=WinMerge\r
59 AppVersion={#AppVersion}\r
60 AppVerName=WinMerge {#AppVersion}\r
61 AppPublisher=Thingamahoochie Software\r
62 AppPublisherURL=http://WinMerge.org/\r
63 AppSupportURL=http://WinMerge.org/\r
64 AppUpdatesURL=http://WinMerge.org/\r
65 \r
66 ; Installer executable's version resource info\r
67 VersionInfoCompany=http://winmerge.org\r
68 VersionInfoDescription=WinMerge Installer\r
69 VersionInfoVersion={#AppVersion}\r
70 \r
71 ;This is in case an older version of the installer happened to be\r
72 DirExistsWarning=no\r
73 \r
74 ;Tells the installer to only display a select language dialog if the an exact match wasn't found\r
75 ShowLanguageDialog=auto\r
76 \r
77 DefaultDirName={pf}\WinMerge\r
78 DefaultGroupName=WinMerge\r
79 DisableStartupPrompt=true\r
80 AllowNoIcons=true\r
81 InfoBeforeFile=..\..\Docs\users\GPL.rtf\r
82 InfoAfterFile=..\..\Docs\users\ReadMe.txt\r
83 \r
84 OutputBaseFilename=WinMerge-{#AppVersion}-Setup\r
85 \r
86 ;This must be admin to install C++ Runtimes and shell extension\r
87 PrivilegesRequired=admin\r
88 \r
89 ;Windows 2000 or later required\r
90 MinVersion=0,5.0\r
91 \r
92 UninstallDisplayIcon={app}\{code:ExeName}\r
93 \r
94 ;Artwork References\r
95 WizardImageFile=Art\Large Logo.bmp\r
96 WizardSmallImageFile=Art\Small Logo.bmp\r
97 WizardImageStretch=true\r
98 \r
99 ;It is confusing, if Setup/Uninstall use the same icon like WinMerge!\r
100 ;SetupIconFile=..\..\src\res\Merge.ico\r
101 \r
102 ;Compression Parameters\r
103 ;Please note while Compression=lzma/ultra and InternalCompressLevel=Ultra are better than max\r
104 ;they also require 320 MB of memory for compression. If you're system has at least 256MB RAM then by all\r
105 ;means set it to ultra before compilation\r
106 Compression=lzma/ultra\r
107 InternalCompressLevel=ultra\r
108 SolidCompression=true\r
109 \r
110 ; Update file associations for shell (project files)\r
111 ChangesAssociations=true\r
112 ; Updates PATH\r
113 ChangesEnvironment=true\r
114 OutputDir=..\..\Build\r
115 AlwaysShowComponentsList=true\r
116 \r
117 ;SignTool=signbat $f\r
118 ;SignedUninstaller=yes\r
119 \r
120 [Languages]\r
121 ;Inno Setup's Native Language\r
122 Name: English; MessagesFile: ..\..\Translations\InnoSetup\English.isl\r
123 \r
124 ;Localizations:\r
125 Name: Basque; MessagesFile: ..\..\Translations\InnoSetup\Basque.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-Basque.txt\r
126 Name: Bulgarian; MessagesFile: ..\..\Translations\InnoSetup\Bulgarian.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-Bulgarian.txt\r
127 Name: Catalan; MessagesFile: ..\..\Translations\InnoSetup\Catalan.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-Catalan.txt\r
128 Name: Chinese_Simplified; MessagesFile: ..\..\Translations\InnoSetup\Chinese_Simplified.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-ChineseSimplified.txt\r
129 Name: Chinese_Traditional; MessagesFile: ..\..\Translations\InnoSetup\Chinese_Traditional.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-ChineseTraditional.txt\r
130 Name: Croatian; MessagesFile: ..\..\Translations\InnoSetup\Croatian.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-Croatian.txt\r
131 Name: Czech; MessagesFile: ..\..\Translations\InnoSetup\Czech.isl\r
132 Name: Danish; MessagesFile: ..\..\Translations\InnoSetup\Danish.isl\r
133 Name: Dutch; MessagesFile: ..\..\Translations\InnoSetup\Dutch.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-Dutch.txt\r
134 Name: French; MessagesFile: ..\..\Translations\InnoSetup\French.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-French.txt\r
135 Name: Galician; MessagesFile: ..\..\Translations\InnoSetup\Galician.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-Galician.txt\r
136 Name: German; MessagesFile: ..\..\Translations\InnoSetup\German.isl\r
137 Name: Greek; MessagesFile: ..\..\Translations\InnoSetup\Greek.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-Greek.txt\r
138 Name: Hungarian; MessagesFile: ..\..\Translations\InnoSetup\Hungarian.isl\r
139 Name: Italian; MessagesFile: ..\..\Translations\InnoSetup\Italian.isl\r
140 Name: Japanese; MessagesFile: ..\..\Translations\InnoSetup\Japanese.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-Japanese.txt\r
141 Name: Korean; MessagesFile: ..\..\Translations\InnoSetup\Korean.isl\r
142 Name: Norwegian; MessagesFile: ..\..\Translations\InnoSetup\Norwegian.isl\r
143 Name: Persian; MessagesFile: ..\..\Translations\InnoSetup\Persian.isl\r
144 Name: Polish; MessagesFile: ..\..\Translations\InnoSetup\Polish.isl\r
145 Name: Portuguese; MessagesFile: ..\..\Translations\InnoSetup\Portuguese.isl\r
146 Name: PortugueseBrazilian; MessagesFile: ..\..\Translations\InnoSetup\Brazilian_Portuguese.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-Brazilian.txt\r
147 Name: Romanian; MessagesFile: ..\..\Translations\InnoSetup\Romanian.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-Romanian.txt\r
148 Name: Russian; MessagesFile: ..\..\Translations\InnoSetup\Russian.isl\r
149 Name: Serbian; MessagesFile: ..\..\Translations\InnoSetup\Serbian.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-Serbian.txt\r
150 Name: Slovak; MessagesFile: ..\..\Translations\InnoSetup\Slovak.isl\r
151 Name: Slovenian; MessagesFile: ..\..\Translations\InnoSetup\Slovenian.isl\r
152 Name: Spanish; MessagesFile: ..\..\Translations\InnoSetup\Spanish.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-Spanish.txt\r
153 Name: Swedish; MessagesFile: ..\..\Translations\InnoSetup\Swedish.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-Swedish.txt\r
154 Name: Turkish; MessagesFile: ..\..\Translations\InnoSetup\Turkish.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-Turkish.txt\r
155 Name: Ukrainian; MessagesFile: ..\..\Translations\InnoSetup\Ukrainian.isl; InfoAfterFile: ..\..\Translations\Docs\Readme\ReadMe-Ukrainian.txt\r
156 \r
157 \r
158 [Messages]\r
159 English.FinishedLabel=Setup has finished installing WinMerge on your computer.\r
160 English.SetupAppTitle=Setup - WinMerge {#AppVersion}\r
161 English.WizardInfoBefore=License Agreement\r
162 English.InfoBeforeLabel=GNU General Public License\r
163 \r
164 \r
165 [Types]\r
166 Name: typical; Description: {cm:TypicalInstallation}\r
167 Name: full; Description: {cm:FullInstallation}\r
168 Name: compact; Description: {cm:CompactInstallation}\r
169 Name: custom; Description: {cm:CustomInstallation}; Flags: iscustom\r
170 \r
171 \r
172 [Components]\r
173 ; Executable, libraries, documentation\r
174 Name: Core; Description: {cm:AppCoreFiles}; Types: full custom typical compact; Flags: fixed\r
175 \r
176 Name: filters; Description: {cm:Filters}; Flags: disablenouninstallwarning; Types: full typical\r
177 Name: Plugins; Description: {cm:Plugins}; Flags: disablenouninstallwarning; Types: full typical\r
178 Name: Frhed; Description: {cm:Frhed}; Flags: disablenouninstallwarning; Types: full typical\r
179 Name: WinIMerge; Description: {cm:WinIMerge}; Flags: disablenouninstallwarning; Types: full typical\r
180 Name: ArchiveSupport; Description: {cm:ArchiveSupport}; Flags: disablenouninstallwarning; Types: full typical\r
181 Name: Patch; Description: {cm:Patch}; Flags: disablenouninstallwarning; Types: full typical\r
182 \r
183 ;Language components\r
184 Name: Languages; Description: {cm:Languages}; Flags: disablenouninstallwarning\r
185 Name: Languages\Basque; Description: {cm:BasqueLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Basque\r
186 Name: Languages\Basque; Description: {cm:BasqueLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Basque\r
187 \r
188 Name: Languages\Bulgarian; Description: {cm:BulgarianLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Bulgarian\r
189 Name: Languages\Bulgarian; Description: {cm:BulgarianLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Bulgarian\r
190 \r
191 Name: Languages\Catalan; Description: {cm:CatalanLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Catalan\r
192 Name: Languages\Catalan; Description: {cm:CatalanLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Catalan\r
193 \r
194 Name: Languages\Chinese_Simplified; Description: {cm:ChineseSimplifiedLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Chinese_Simplified\r
195 Name: Languages\Chinese_Simplified; Description: {cm:ChineseSimplifiedLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Chinese_Simplified\r
196 \r
197 Name: Languages\Chinese_Traditional; Description: {cm:ChineseTraditionalLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Chinese_Traditional\r
198 Name: Languages\Chinese_Traditional; Description: {cm:ChineseTraditionalLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Chinese_Traditional\r
199 \r
200 Name: Languages\Croatian; Description: {cm:CroatianLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Croatian\r
201 Name: Languages\Croatian; Description: {cm:CroatianLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Croatian\r
202 \r
203 Name: Languages\Czech; Description: {cm:CzechLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Czech\r
204 Name: Languages\Czech; Description: {cm:CzechLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Czech\r
205 \r
206 Name: Languages\Danish; Description: {cm:DanishLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Danish\r
207 Name: Languages\Danish; Description: {cm:DanishLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Danish\r
208 \r
209 Name: Languages\Dutch; Description: {cm:DutchLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Dutch\r
210 Name: Languages\Dutch; Description: {cm:DutchLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Dutch\r
211 \r
212 Name: Languages\French; Description: {cm:FrenchLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not French\r
213 Name: Languages\French; Description: {cm:FrenchLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: French\r
214 \r
215 Name: Languages\Galician; Description: {cm:GalicianLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Galician\r
216 Name: Languages\Galician; Description: {cm:GalicianLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Galician\r
217 \r
218 Name: Languages\German; Description: {cm:GermanLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not German\r
219 Name: Languages\German; Description: {cm:GermanLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: German\r
220 \r
221 Name: Languages\Greek; Description: {cm:GreekLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Greek\r
222 Name: Languages\Greek; Description: {cm:GreekLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Greek\r
223 \r
224 Name: Languages\Hungarian; Description: {cm:HungarianLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Hungarian\r
225 Name: Languages\Hungarian; Description: {cm:HungarianLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Hungarian\r
226 \r
227 Name: Languages\Italian; Description: {cm:ItalianLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Italian\r
228 Name: Languages\Italian; Description: {cm:ItalianLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Italian\r
229 \r
230 Name: Languages\Japanese; Description: {cm:JapaneseLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Japanese\r
231 Name: Languages\Japanese; Description: {cm:JapaneseLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Japanese\r
232 \r
233 Name: Languages\Korean; Description: {cm:KoreanLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Korean\r
234 Name: Languages\Korean; Description: {cm:KoreanLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Korean\r
235 \r
236 Name: Languages\Norwegian; Description: {cm:NorwegianLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Norwegian\r
237 Name: Languages\Norwegian; Description: {cm:NorwegianLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Norwegian\r
238 \r
239 Name: Languages\Persian; Description: {cm:PersianLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Persian\r
240 Name: Languages\Persian; Description: {cm:PersianLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Persian\r
241 \r
242 Name: Languages\Polish; Description: {cm:PolishLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Polish\r
243 Name: Languages\Polish; Description: {cm:PolishLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Polish\r
244 \r
245 Name: Languages\Portuguese; Description: {cm:PortugueseLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Portuguese\r
246 Name: Languages\Portuguese; Description: {cm:PortugueseLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Portuguese\r
247 \r
248 Name: Languages\PortugueseBrazilian; Description: {cm:PortugueseBrazilLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not PortugueseBrazilian\r
249 Name: Languages\PortugueseBrazilian; Description: {cm:PortugueseBrazilLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: PortugueseBrazilian\r
250 \r
251 Name: Languages\Romanian; Description: {cm:RomanianLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Romanian\r
252 Name: Languages\Romanian; Description: {cm:RomanianLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Romanian\r
253 \r
254 Name: Languages\Russian; Description: {cm:RussianLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Russian\r
255 Name: Languages\Russian; Description: {cm:RussianLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Russian\r
256 \r
257 Name: Languages\Serbian; Description: {cm:SerbianLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Serbian\r
258 Name: Languages\Serbian; Description: {cm:SerbianLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Serbian\r
259 \r
260 Name: Languages\Slovak; Description: {cm:SlovakLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Slovak\r
261 Name: Languages\Slovak; Description: {cm:SlovakLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Slovak\r
262 \r
263 Name: Languages\Slovenian; Description: {cm:SlovenianLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Slovenian\r
264 Name: Languages\Slovenian; Description: {cm:SlovenianLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Slovenian\r
265 \r
266 Name: Languages\Spanish; Description: {cm:SpanishLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Spanish\r
267 Name: Languages\Spanish; Description: {cm:SpanishLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Spanish\r
268 \r
269 Name: Languages\Swedish; Description: {cm:SwedishLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Swedish\r
270 Name: Languages\Swedish; Description: {cm:SwedishLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Swedish\r
271 \r
272 Name: Languages\Turkish; Description: {cm:TurkishLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Turkish\r
273 Name: Languages\Turkish; Description: {cm:TurkishLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Turkish\r
274 \r
275 Name: Languages\Ukrainian; Description: {cm:UkrainianLanguage}; Flags: disablenouninstallwarning; Types: full; Languages: not Ukrainian\r
276 Name: Languages\Ukrainian; Description: {cm:UkrainianLanguage}; Flags: disablenouninstallwarning; Types: full typical compact; Languages: Ukrainian\r
277 \r
278 \r
279 [Tasks]\r
280 Name: ShellExtension; Description: {cm:ExplorerContextMenu}; GroupDescription: {cm:OptionalFeatures}\r
281 Name: modifypath; Description: {cm:AddToPath}; GroupDescription: {cm:OptionalFeatures}; Flags: unchecked\r
282 Name: TortoiseCVS; Description: {cm:IntegrateTortoiseCVS}; GroupDescription: {cm:OptionalFeatures}; Check: TortoiseCVSInstalled\r
283 Name: TortoiseGit; Description: {cm:IntegrateTortoiseGit}; GroupDescription: {cm:OptionalFeatures}; Check: TortoiseGitInstalled; MinVersion: 0,5.0.2195sp3\r
284 Name: TortoiseSVN; Description: {cm:IntegrateTortoiseSVN}; GroupDescription: {cm:OptionalFeatures}; Check: TortoiseSVNInstalled; MinVersion: 0,5.0.2195sp3\r
285 Name: ClearCase; Description: {cm:IntegrateClearCase}; GroupDescription: {cm:OptionalFeatures}; Check: ClearCaseInstalled\r
286 Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked\r
287 Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; OnlyBelowVersion: 0,6.1\r
288 \r
289 [InstallDelete]\r
290 ; Diff.txt is a file left over from previous versions of WinMerge (before version 2.0), we just delete it to be nice.\r
291 Type: files; Name: {app}\Diff.txt\r
292 \r
293 ;All of these files are removed so if the user upgrades their operating system or changes their language selections only the\r
294 ;necessary files will be left in the installation folder\r
295 ;Another reason these files might be strays is if a user extracted one of the experimental builds such as:\r
296 ;WinMerge.{#AppVersion}-exe.7z.\r
297 Name: {app}\WinMerge.exe; Type: files\r
298 Name: {app}\WinMergeU.exe; Type: files; MinVersion: 0, 4\r
299 \r
300 ;Remove manifest files as we don't need them in 2.6.2 / 2.7.1.1 or later\r
301 Name: {app}\WinMerge.exe.manifest; Type: files\r
302 Name: {app}\WinMergeU.exe.manifest; Type: files\r
303 \r
304 Name: {app}\Merge7z311.dll; Type: files\r
305 Name: {app}\Merge7z311U.dll; Type: files; MinVersion: 0, 4\r
306 \r
307 Name: {app}\Merge7z312.dll; Type: files\r
308 Name: {app}\Merge7z312U.dll; Type: files; MinVersion: 0, 4\r
309 \r
310 Name: {app}\Merge7z313.dll; Type: files\r
311 Name: {app}\Merge7z313U.dll; Type: files; MinVersion: 0, 4\r
312 \r
313 Name: {app}\Merge7z420.dll; Type: files\r
314 Name: {app}\Merge7z420U.dll; Type: files; MinVersion: 0, 4\r
315 \r
316 Name: {app}\Merge7z423.dll; Type: files\r
317 Name: {app}\Merge7z423U.dll; Type: files; MinVersion: 0, 4\r
318 \r
319 Name: {app}\Merge7z431.dll; Type: files\r
320 Name: {app}\Merge7z431U.dll; Type: files; MinVersion: 0, 4\r
321 \r
322 Name: {app}\Merge7z432.dll; Type: files\r
323 Name: {app}\Merge7z432U.dll; Type: files; MinVersion: 0, 4\r
324 \r
325 Name: {app}\Merge7z442.dll; Type: files\r
326 Name: {app}\Merge7z442U.dll; Type: files; MinVersion: 0, 4\r
327 \r
328 Name: {app}\Merge7z457.dll; Type: files\r
329 Name: {app}\Merge7z457U.dll; Type: files; MinVersion: 0, 4\r
330 \r
331 Name: {app}\Merge7z465.dll; Type: files\r
332 Name: {app}\Merge7z465U.dll; Type: files; MinVersion: 0, 4\r
333 \r
334 Name: {app}\Merge7z920.dll; Type: files\r
335 Name: {app}\Merge7z920U.dll; Type: files; MinVersion: 0, 4\r
336 \r
337 ;This won't work, because the file has to be unregistered, and explorer closed, first.\r
338 ;Name: {app}\ShellExtension.dll; Type: files; Check: TaskDisabled('ShellExtension')\r
339 \r
340 ; Remove existing .lang files - we don't need them anymore as we are\r
341 ; using PO files now.\r
342 Name: {app}\Languages\MergeBrazilian.lang; Type: files\r
343 Name: {app}\Languages\MergeBulgarian.lang; Type: files\r
344 Name: {app}\Languages\MergeCatalan.lang; Type: files\r
345 Name: {app}\Languages\MergeChineseSimplified.lang; Type: files\r
346 Name: {app}\Languages\MergeChineseTraditional.lang; Type: files\r
347 Name: {app}\Languages\MergeCzech.lang; Type: files\r
348 Name: {app}\Languages\MergeDanish.lang; Type: files\r
349 Name: {app}\Languages\MergeDutch.lang; Type: files\r
350 Name: {app}\Languages\MergeFrench.lang; Type: files\r
351 Name: {app}\Languages\MergeGerman.lang; Type: files\r
352 Name: {app}\Languages\MergeHungarian.lang; Type: files\r
353 Name: {app}\Languages\MergeItalian.lang; Type: files\r
354 Name: {app}\Languages\MergeJapanese.lang; Type: files\r
355 Name: {app}\Languages\MergeKorean.lang; Type: files\r
356 Name: {app}\Languages\MergeNorwegian.lang; Type: files\r
357 Name: {app}\Languages\MergePersian.lang; Type: files\r
358 Name: {app}\Languages\MergePolish.lang; Type: files\r
359 Name: {app}\Languages\MergePortuguese.lang; Type: files\r
360 Name: {app}\Languages\MergeSlovak.lang; Type: files\r
361 Name: {app}\Languages\MergeSpanish.lang; Type: files\r
362 Name: {app}\Languages\MergeRussian.lang; Type: files\r
363 Name: {app}\Languages\MergeSerbian.lang; Type: files\r
364 Name: {app}\Languages\MergeSwedish.lang; Type: files\r
365 Name: {app}\Languages\MergeTurkish.lang; Type: files\r
366 Name: {app}\MergePlugins\list.txt; Type: files; Check: not IsComponentSelected('Plugins')\r
367 \r
368 ;Removes the user's guide icon if the user deselects the user's guide component.\r
369 Name: {group}\{cm:UsersGuide}.lnk; Type: files; Check: not IsComponentSelected('Docs')\r
370 \r
371 ;This removes the quick launch icon in case the user chooses not to install it after previously having it installed\r
372 Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\WinMerge.lnk; Type: files; Check: not IsTaskSelected('QuickLauchIcon')\r
373 Name: {commonappdata}\Microsoft\Internet Explorer\Quick Launch\WinMerge.lnk; Type: files; Check: not IsTaskSelected('QuickLauchIcon')\r
374 \r
375 ;This removes the desktop icon in case the user chooses not to install it after previously having it installed\r
376 Name: {userdesktop}\WinMerge.lnk; Type: files; Check: not IsTaskSelected('DesktopIcon')\r
377 Name: {commondesktop}\WinMerge.lnk; Type: files; Check: not IsTaskSelected('DesktopIcon')\r
378 \r
379 ;Removes the Uninstall icon from the start menu...\r
380 Name: {group}\{cm:UninstallProgram,WinMerge}.lnk; Type: files;\r
381 \r
382 ;Remove ANSI executable link from start menu for NT-based Windows versions\r
383 ;This was installed earlier, but not anymore.\r
384 Name: {group}\WinMerge (ANSI).lnk; Type: files; MinVersion: 0,4\r
385 Name: {app}\Docs; Type: filesandordirs\r
386 \r
387 Name: {app}\MergePlugins\editor addin.sct; Type: Files; Check: not IsComponentSelected('Plugins')\r
388 Name: {app}\MergePlugins\insert datetime.sct; Type: Files; Check: not IsComponentSelected('Plugins')\r
389 Name: {app}\MergePlugins\CompareMSExcelFiles.dll; Type: Files; Check: IsComponentSelected('Plugins')\r
390 Name: {app}\MergePlugins\CompareMSWordFiles.dll; Type: Files; Check: IsComponentSelected('Plugins')\r
391 Name: {app}\MergePlugins; Type: DirIfEmpty; Check: not IsComponentSelected('Plugins')\r
392 \r
393 Name: {app}\Filters\ADAMulti.flt; Type: Files; Check: not IsComponentSelected('Filters')\r
394 Name: {app}\Filters\ASPNET.flt; Type: Files; Check: not IsComponentSelected('Filters')\r
395 Name: {app}\Filters\CSharp_loose.flt; Type: Files; Check: not IsComponentSelected('Filters')\r
396 Name: {app}\Filters\Delphi.flt; Type: Files; Check: not IsComponentSelected('Filters')\r
397 Name: {app}\Filters\MASM.flt; Type: Files; Check: not IsComponentSelected('Filters')\r
398 Name: {app}\Filters\Merge_GnuC_loose.flt; Type: Files; Check: not IsComponentSelected('Filters')\r
399 Name: {app}\Filters\Merge_VC_loose.flt; Type: Files; Check: not IsComponentSelected('Filters')\r
400 Name: {app}\Filters\Merge_VB_loose.flt; Type: Files; Check: not IsComponentSelected('Filters')\r
401 Name: {app}\Filters\SourceControl.flt; Type: Files; Check: not IsComponentSelected('Filters')\r
402 Name: {app}\Filters\Symbian.flt; Type: Files; Check: not IsComponentSelected('Filters')\r
403 Name: {app}\Filters\XML_html.flt; Type: Files; Check: not IsComponentSelected('Filters')\r
404 Name: {app}\Filters\FileFilter.tmpl; Type: Files; Check: not IsComponentSelected('Filters')\r
405 Name: {app}\Filters; Type: DirIfEmpty; Check: not IsComponentSelected('Filters')\r
406 \r
407 \r
408 \r
409 [Dirs]\r
410 ;The always uninstall flag tells the uninstaller to remove the folder if it's empty regardless of whether or not it existed prior to the installation\r
411 Name: {app}; Flags: uninsalwaysuninstall\r
412 \r
413 \r
414 [Files]\r
415 ; WinMerge itself\r
416 Source: ..\..\Build\MergeUnicodeRelease\WinMergeU.exe; DestDir: {app}; Flags: promptifolder; Components: Core\r
417 \r
418 ; List of installed files\r
419 Source: ..\..\Docs\Users\Files.txt; DestDir: {app}; Flags: promptifolder; Components: Core\r
420 \r
421 ; Shell extension\r
422 Source: ..\..\Build\ShellExtension\ShellExtensionU.dll; DestDir: {app}; Flags: regserver uninsrestartdelete restartreplace promptifolder; MinVersion: 0, 4; Check: not IsWin64\r
423 ; 64-bit version of ShellExtension\r
424 Source: ..\..\Build\ShellExtension\ShellExtensionX64.dll; DestDir: {app}; Flags: regserver uninsrestartdelete restartreplace promptifolder 64bit; MinVersion: 0,5.01.2600; Check: IsWin64\r
425 \r
426 ;Please do not reorder the 7z Dlls by version they compress better ordered by platform and then by version\r
427 Source: ..\..\Build\Merge7z\Merge7z1604U.dll; DestDir: {app}\Merge7z; Flags: promptifolder; MinVersion: 0, 4; Components: ArchiveSupport\r
428 Source: ..\..\Build\Merge7z\7z.dll; DestDir: {app}\Merge7z; Flags: promptifolder; MinVersion: 0, 4; Components: ArchiveSupport\r
429 Source: ..\..\Build\Merge7z\*.txt; DestDir: {app}\Merge7z; Flags: promptifolder; MinVersion: 0, 4; Components: ArchiveSupport\r
430 Source: ..\..\Build\Merge7z\Lang\*.txt; DestDir: {app}\Merge7z\Lang; Flags: promptifolder; MinVersion: 0, 4; Components: ArchiveSupport\r
431 \r
432 ; MergeLang.dll - translation helper dll\r
433 Source: ..\..\Build\MergeUnicodeRelease\MergeLang.dll; DestDir: {app}; Flags: promptifolder ignoreversion; Components: Core\r
434 \r
435 ; Language files\r
436 Source: ..\..\Translations\WinMerge\Basque.po; DestDir: {app}\Languages; Components: Languages\Basque; Flags: ignoreversion comparetimestamp\r
437 Source: ..\..\Translations\Docs\Readme\ReadMe-Basque.txt; DestDir: {app}\Docs; Components: Languages\Basque\r
438 Source: ..\..\Translations\WinMerge\Brazilian.po; DestDir: {app}\Languages; Components: Languages\PortugueseBrazilian; Flags: ignoreversion comparetimestamp\r
439 Source: ..\..\Translations\Docs\Readme\ReadMe-Brazilian.txt; DestDir: {app}\Docs; Components: Languages\PortugueseBrazilian\r
440 Source: ..\..\Translations\WinMerge\Bulgarian.po; DestDir: {app}\Languages; Components: Languages\Bulgarian; Flags: ignoreversion comparetimestamp\r
441 Source: ..\..\Translations\Docs\Readme\ReadMe-Bulgarian.txt; DestDir: {app}\Docs; Components: Languages\Bulgarian\r
442 Source: ..\..\Translations\WinMerge\Catalan.po; DestDir: {app}\Languages; Components: Languages\Catalan; Flags: ignoreversion comparetimestamp\r
443 Source: ..\..\Translations\Docs\Readme\ReadMe-Catalan.txt; DestDir: {app}\Docs; Components: Languages\Catalan\r
444 Source: ..\..\Translations\WinMerge\ChineseSimplified.po; DestDir: {app}\Languages; Components: Languages\Chinese_Simplified; Flags: ignoreversion comparetimestamp\r
445 Source: ..\..\Translations\Docs\Readme\ReadMe-ChineseSimplified.txt; DestDir: {app}\Docs; Components: Languages\Chinese_Simplified\r
446 Source: ..\..\Translations\WinMerge\ChineseTraditional.po; DestDir: {app}\Languages; Components: Languages\Chinese_Traditional; Flags: ignoreversion comparetimestamp\r
447 Source: ..\..\Translations\Docs\Readme\ReadMe-ChineseTraditional.txt; DestDir: {app}\Docs; Components: Languages\Chinese_Traditional\r
448 Source: ..\..\Translations\WinMerge\Croatian.po; DestDir: {app}\Languages; Components: Languages\Croatian; Flags: ignoreversion comparetimestamp\r
449 Source: ..\..\Translations\Docs\Readme\ReadMe-Croatian.txt; DestDir: {app}\Docs; Components: Languages\Croatian\r
450 Source: ..\..\Translations\WinMerge\Czech.po; DestDir: {app}\Languages; Components: Languages\Czech; Flags: ignoreversion comparetimestamp\r
451 Source: ..\..\Translations\WinMerge\Danish.po; DestDir: {app}\Languages; Components: Languages\Danish; Flags: ignoreversion comparetimestamp\r
452 Source: ..\..\Translations\WinMerge\Dutch.po; DestDir: {app}\Languages; Components: Languages\Dutch; Flags: ignoreversion comparetimestamp\r
453 Source: ..\..\Translations\Docs\Readme\ReadMe-Dutch.txt; DestDir: {app}\Docs; Components: Languages\Dutch\r
454 Source: ..\..\Translations\WinMerge\French.po; DestDir: {app}\Languages; Components: Languages\French; Flags: ignoreversion comparetimestamp\r
455 Source: ..\..\Translations\Docs\Readme\ReadMe-French.txt; DestDir: {app}\Docs; Components: Languages\French\r
456 Source: ..\..\Translations\WinMerge\Galician.po; DestDir: {app}\Languages; Components: Languages\Galician; Flags: ignoreversion comparetimestamp\r
457 Source: ..\..\Translations\Docs\Readme\ReadMe-Galician.txt; DestDir: {app}\Docs; Components: Languages\Galician\r
458 Source: ..\..\Translations\WinMerge\German.po; DestDir: {app}\Languages; Components: Languages\German; Flags: ignoreversion comparetimestamp\r
459 Source: ..\..\Translations\WinMerge\Greek.po; DestDir: {app}\Languages; Components: Languages\Greek; Flags: ignoreversion comparetimestamp\r
460 Source: ..\..\Translations\Docs\Readme\ReadMe-Greek.txt; DestDir: {app}\Docs; Components: Languages\Greek\r
461 Source: ..\..\Translations\WinMerge\Hungarian.po; DestDir: {app}\Languages; Components: Languages\Hungarian; Flags: ignoreversion comparetimestamp\r
462 Source: ..\..\Translations\WinMerge\Italian.po; DestDir: {app}\Languages; Components: Languages\Italian; Flags: ignoreversion comparetimestamp\r
463 Source: ..\..\Translations\WinMerge\Japanese.po; DestDir: {app}\Languages; Components: Languages\Japanese; Flags: ignoreversion comparetimestamp\r
464 Source: ..\..\Translations\Docs\Readme\ReadMe-Japanese.txt; DestDir: {app}\Docs; Components: Languages\Japanese\r
465 Source: ..\..\Build\Manual\htmlhelp\WinMerge_ja.chm; DestDir: {app}\Docs; Components: Languages\Japanese\r
466 Source: ..\..\Translations\WinMerge\Korean.po; DestDir: {app}\Languages; Components: Languages\Korean; Flags: ignoreversion comparetimestamp\r
467 Source: ..\..\Translations\WinMerge\Norwegian.po; DestDir: {app}\Languages; Components: Languages\Norwegian; Flags: ignoreversion comparetimestamp\r
468 Source: ..\..\Translations\WinMerge\Persian.po; DestDir: {app}\Languages; Components: Languages\Persian; Flags: ignoreversion comparetimestamp\r
469 Source: ..\..\Translations\WinMerge\Polish.po; DestDir: {app}\Languages; Components: Languages\Polish; Flags: ignoreversion comparetimestamp\r
470 Source: ..\..\Translations\WinMerge\Portuguese.po; DestDir: {app}\Languages; Components: Languages\Portuguese; Flags: ignoreversion comparetimestamp\r
471 Source: ..\..\Translations\WinMerge\Romanian.po; DestDir: {app}\Languages; Components: Languages\Romanian; Flags: ignoreversion comparetimestamp\r
472 Source: ..\..\Translations\Docs\Readme\ReadMe-Romanian.txt; DestDir: {app}\Docs; Components: Languages\Romanian\r
473 Source: ..\..\Translations\WinMerge\Russian.po; DestDir: {app}\Languages; Components: Languages\Russian; Flags: ignoreversion comparetimestamp\r
474 Source: ..\..\Translations\WinMerge\Serbian.po; DestDir: {app}\Languages; Components: Languages\Serbian; Flags: ignoreversion comparetimestamp\r
475 Source: ..\..\Translations\Docs\Readme\ReadMe-Serbian.txt; DestDir: {app}\Docs; Components: Languages\Serbian\r
476 Source: ..\..\Translations\WinMerge\Slovak.po; DestDir: {app}\Languages; Components: Languages\Slovak; Flags: ignoreversion comparetimestamp\r
477 Source: ..\..\Translations\WinMerge\Slovenian.po; DestDir: {app}\Languages; Components: Languages\Slovenian; Flags: ignoreversion comparetimestamp\r
478 Source: ..\..\Translations\WinMerge\Spanish.po; DestDir: {app}\Languages; Components: Languages\Spanish; Flags: ignoreversion comparetimestamp\r
479 Source: ..\..\Translations\Docs\Readme\ReadMe-Spanish.txt; DestDir: {app}\Docs; Components: Languages\Spanish\r
480 Source: ..\..\Translations\WinMerge\Swedish.po; DestDir: {app}\Languages; Components: Languages\Swedish; Flags: ignoreversion comparetimestamp\r
481 Source: ..\..\Translations\Docs\Readme\ReadMe-Swedish.txt; DestDir: {app}\Docs; Components: Languages\Swedish\r
482 Source: ..\..\Translations\WinMerge\Turkish.po; DestDir: {app}\Languages; Components: Languages\Turkish; Flags: ignoreversion comparetimestamp\r
483 Source: ..\..\Translations\Docs\Readme\ReadMe-Turkish.txt; DestDir: {app}\Docs; Components: Languages\Turkish\r
484 Source: ..\..\Translations\WinMerge\Ukrainian.po; DestDir: {app}\Languages; Components: Languages\Ukrainian; Flags: ignoreversion comparetimestamp\r
485 Source: ..\..\Translations\Docs\Readme\ReadMe-Ukrainian.txt; DestDir: {app}\Docs; Components: Languages\Ukrainian\r
486 \r
487 Source: ..\..\Filters\*.flt; DestDir: {app}\Filters; Flags: sortfilesbyextension comparetimestamp ignoreversion; Components: filters\r
488 Source: ..\..\Filters\FileFilter.tmpl; DestDir: {app}\Filters; Flags: sortfilesbyextension comparetimestamp ignoreversion; Components: filters\r
489 \r
490 ;Documentation\r
491 Source: ..\..\Docs\Users\ReadMe.txt; DestDir: {app}\Docs; Flags: comparetimestamp ignoreversion promptifolder; Components: Core\r
492 Source: ..\..\Docs\Users\Contributors.txt; DestDir: {app}; Flags: comparetimestamp ignoreversion promptifolder; Components: Core\r
493 Source: ..\..\Docs\Users\ReleaseNotes.html; DestDir: {app}\Docs; Flags: comparetimestamp ignoreversion promptifolder; Components: Core\r
494 Source: ..\..\Docs\Users\ChangeLog.txt; DestDir: {app}\Docs; Flags: comparetimestamp ignoreversion promptifolder; Components: Core\r
495 Source: ..\..\Build\Manual\htmlhelp\WinMerge.chm; DestDir: {app}\Docs\; Flags: overwritereadonly uninsremovereadonly; Components: Core\r
496 Source: ..\..\Docs\users\GPL.rtf; DestDir: {app}\Docs\; Flags: comparetimestamp ignoreversion promptifolder; Components: Core\r
497 \r
498 ;Plugins\r
499 ;Please note IgnoreVersion and CompareTimeStamp are to instruct the installer to not not check for version info and go straight to comparing modification dates\r
500 Source: ..\..\Plugins\dlls\editor addin.sct; DestDir: {app}\MergePlugins; Flags: IgnoreVersion CompareTimeStamp; Components: Plugins\r
501 Source: ..\..\Plugins\dlls\insert datetime.sct; DestDir: {app}\MergePlugins; Flags: IgnoreVersion CompareTimeStamp; Components: Plugins\r
502 Source: ..\..\Plugins\dlls\CompareMSExcelFiles.sct; DestDir: {app}\MergePlugins; Flags: IgnoreVersion CompareTimeStamp; Components: Plugins\r
503 Source: ..\..\Plugins\dlls\CompareMSWordFiles.sct; DestDir: {app}\MergePlugins; Flags: IgnoreVersion CompareTimeStamp; Components: Plugins\r
504 Source: ..\..\Plugins\dlls\CompareMSPowerPointFiles.sct; DestDir: {app}\MergePlugins; Flags: IgnoreVersion CompareTimeStamp; Components: Plugins\r
505 Source: ..\..\Plugins\dlls\ApplyPatch.sct; DestDir: {app}\MergePlugins; Flags: IgnoreVersion CompareTimeStamp; Components: Plugins\r
506 Source: ..\..\Plugins\dlls\IgnoreColumns.dll; DestDir: {app}\MergePlugins; Flags: ignoreversion comparetimestamp; Components: Plugins\r
507 Source: ..\..\Plugins\dlls\IgnoreCommentsC.dll; DestDir: {app}\MergePlugins; Flags: ignoreversion comparetimestamp; Components: Plugins\r
508 Source: ..\..\Plugins\dlls\IgnoreFieldsComma.dll; DestDir: {app}\MergePlugins; Flags: ignoreversion comparetimestamp; Components: Plugins\r
509 Source: ..\..\Plugins\dlls\IgnoreFieldsTab.dll; DestDir: {app}\MergePlugins; Flags: ignoreversion comparetimestamp; Components: Plugins\r
510 Source: ..\..\Plugins\dlls\IgnoreLeadingLineNumbers.dll; DestDir: {app}\MergePlugins; Flags: ignoreversion comparetimestamp; Components: Plugins\r
511 \r
512 ;Frhed\r
513 Source: ..\..\Build\Frhed\GPL.txt; DestDir: {app}\Frhed; Components: Frhed\r
514 ;Source: ..\..\Build\Frhed\frhed.exe; DestDir: {app}\Frhed; Components: Frhed\r
515 Source: ..\..\Build\Frhed\hekseditU.dll; DestDir: {app}\Frhed; Flags: ignoreversion comparetimestamp; Components: Frhed\r
516 Source: ..\..\Build\Frhed\Docs\ChangeLog.txt; DestDir: {app}\Frhed\Docs; Components: Frhed\r
517 Source: ..\..\Build\Frhed\Docs\Contributors.txt; DestDir: {app}\Frhed\Docs; Components: Frhed\r
518 Source: ..\..\Build\Frhed\Docs\History.txt; DestDir: {app}\Frhed\Docs; Components: Frhed\r
519 Source: ..\..\Build\Frhed\Docs\Links.txt; DestDir: {app}\Frhed\Docs; Components: Frhed\r
520 Source: ..\..\Build\Frhed\Docs\Sample.tpl  ; DestDir: {app}\Frhed\Docs; Components: Frhed\r
521 Source: ..\..\Build\Frhed\Languages\de.po; DestDir: {app}\Frhed\Languages; Components: Frhed\r
522 Source: ..\..\Build\Frhed\Languages\fr.po; DestDir: {app}\Frhed\Languages; Components: Frhed\r
523 Source: ..\..\Build\Frhed\Languages\ja.po; DestDir: {app}\Frhed\Languages; Components: Frhed\r
524 Source: ..\..\Build\Frhed\Languages\nl.po; DestDir: {app}\Frhed\Languages; Components: Frhed\r
525 Source: ..\..\Build\Frhed\Languages\heksedit.lng; DestDir: {app}\Frhed\Languages; Components: Frhed\r
526 \r
527 ;WinIMerge\r
528 Source: ..\..\Build\WinIMerge\GPL.txt; DestDir: {app}\WinIMerge; Components: WinIMerge\r
529 Source: ..\..\Build\WinIMerge\freeimage-license-gplv2.txt; DestDir: {app}\WinIMerge; Components: WinIMerge\r
530 ;Source: ..\..\Build\WinIMerge\bin\WinIMerge.exe; DestDir: {app}\WinIMerge; Components: WinIMerge\r
531 Source: ..\..\Build\WinIMerge\bin\WinIMergeLib.dll; DestDir: {app}\WinIMerge; Flags: ignoreversion comparetimestamp; Components: WinIMerge\r
532 Source: ..\..\Build\WinIMerge\bin\vcomp140.dll; DestDir: {app}; Components: WinIMerge\r
533 \r
534 ;GnuWin32 Patch for Windows\r
535 Source: ..\..\Build\GnuWin32\*.*; DestDir: {app}\GnuWin32; Flags: recursesubdirs; Components: Patch\r
536 \r
537 [Dirs]\r
538 Name: "{app}\MergePlugins"\r
539 \r
540 [Icons]\r
541 ;Start Menu Icons\r
542 Name: {group}\WinMerge; Filename: {app}\{code:ExeName}; AppUserModelID: "Thingamahoochie.WinMerge"\r
543 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe.txt; IconFileName: {win}\NOTEPAD.EXE\r
544 Name: {group}\{cm:UsersGuide}; Filename: {app}\Docs\WinMerge.chm\r
545 Name: {group}\{cm:UninstallProgram,WinMerge}; Filename: {uninstallexe}\r
546 Name: {group}\{cm:ProgramOnTheWeb,WinMerge}; Filename: http://winmerge.org\r
547 \r
548 ;Link to translated ReadMe in Start Menu\r
549 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Basque.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Basque\r
550 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Brazilian.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: PortugueseBrazilian\r
551 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Bulgarian.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Bulgarian\r
552 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Catalan.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Catalan\r
553 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-ChineseSimplified.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Chinese_Simplified\r
554 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-ChineseTraditional.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Chinese_Traditional\r
555 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Croatian.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Croatian\r
556 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Dutch.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Dutch\r
557 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-French.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: French\r
558 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Galician.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Galician\r
559 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Greek.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Greek\r
560 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Japanese.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Japanese\r
561 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Romanian.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Romanian\r
562 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Serbian.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Serbian\r
563 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Spanish.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Spanish\r
564 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Swedish.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Swedish\r
565 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Turkish.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Turkish\r
566 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Ukrainian.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Ukrainian\r
567 \r
568 ;Desktop Icon\r
569 Name: {commondesktop}\WinMerge; Filename: {app}\{code:ExeName}; Tasks: desktopicon\r
570 \r
571 ;Quick Launch Icon\r
572 Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\WinMerge; Filename: {app}\{code:ExeName}; Tasks: quicklaunchicon\r
573 \r
574 [Registry]\r
575 Root: HKCU; Subkey: Software\Thingamahoochie; Flags: uninsdeletekeyifempty\r
576 Root: HKCU; Subkey: Software\Thingamahoochie\WinMerge; Flags: uninsdeletekey\r
577 Root: HKLM; Subkey: Software\Thingamahoochie; Flags: uninsdeletekeyifempty\r
578 Root: HKLM; Subkey: Software\Thingamahoochie\WinMerge; Flags: uninsdeletekey\r
579 \r
580 ;Add Project file extension (.WinMerge) to known extensions and\r
581 ;set WinMerge to open those files\r
582 ;set Notepad to edit project files\r
583 Root: HKCR; Subkey: .WinMerge; ValueType: String; ValueData: WinMerge.Project.File; Flags: uninsdeletekey\r
584 Root: HKCR; Subkey: WinMerge.Project.File; ValueType: String; ValueData: {cm:ProjectFileDesc}; Flags: uninsdeletekey\r
585 Root: HKCR; Subkey: WinMerge.Project.File\shell\open\command; ValueType: String; ValueData: """{app}\{code:ExeName}"" ""%1"""; Flags: uninsdeletekey\r
586 Root: HKCR; Subkey: WinMerge.Project.File\shell\edit\command; ValueType: String; ValueData: """NOTEPAD.EXE"" ""%1"""; Flags: uninsdeletekey\r
587 Root: HKCR; Subkey: WinMerge.Project.File\DefaultIcon; ValueType: String; ValueData: """{app}\{code:ExeName}"",1"; Flags: uninsdeletekey\r
588 \r
589 ; delete obsolete values\r
590 ;In Inno Setup Version 4.18 ValueData couldn't be null and compile,\r
591 ;if this is fixed in a later version feel free to remove the parameter\r
592 Root: HKCU; Subkey: Software\Thingamahoochie\WinMerge\Settings; ValueType: none; ValueName: LeftMax; Flags: deletevalue\r
593 Root: HKCU; Subkey: Software\Thingamahoochie\WinMerge\Settings; ValueType: none; ValueName: DirViewMax; Flags: deletevalue\r
594 \r
595 ;This removes the key that remembers which messageboxes to hide from the user, this is because the text of that message\r
596 ;can change and make it more clear as to the user why they might want to pay attention to a particular dialog and also\r
597 ;because a particular message might be added or removed and a new message might occupy a previous message's ID number\r
598 Root: HKLM; Subkey: Software\Thingamahoochie\WinMerge\MessageBoxes; ValueType: none; Flags: deletekey\r
599 \r
600 Root: HKCR; SubKey: Directory\Shell\WinMerge\command; ValueType: none; Flags: deletekey noerror\r
601 Root: HKCR; SubKey: Directory\Shell\WinMerge; ValueType: none; Flags: deletekey noerror\r
602 \r
603 ;Adds "Start Menu" --> "Run" Support for WinMerge\r
604 Root: HKLM; Subkey: Software\Microsoft\Windows\CurrentVersion\App Paths\WinMerge.exe; ValueType: none; Flags: uninsdeletekey\r
605 Root: HKLM; Subkey: Software\Microsoft\Windows\CurrentVersion\App Paths\WinMergeU.exe; ValueType: none; Flags: uninsdeletekey\r
606 Root: HKLM; SubKey: SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\WinMerge.exe; ValueType: string; ValueName: ; ValueData: {app}\{code:ExeName}\r
607 Root: HKLM; SubKey: SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\WinMergeU.exe; ValueType: string; ValueName: ; ValueData: {app}\{code:ExeName}\r
608 \r
609 ;Registry Keys for use by ShellExtension.dll\r
610 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge; ValueType: string; ValueName: Executable; ValueData: {app}\{code:ExeName}\r
611 \r
612 ;Enables or disables the Context Menu preference based on what the user selects during install\r
613 ;Initially the Context menu is explicitly disabled:\r
614 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge; ValueType: dword; ValueName: ContextMenuEnabled; ValueData: 0;\r
615 \r
616 ;If the user chose to use the context menu then we re-enable it.  This is necessary so it'll turn on and off not just on.\r
617 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge; ValueType: dword; ValueName: ContextMenuEnabled; ValueData: 1; Tasks: ShellExtension\r
618 Root: HKCU; SubKey: Software\Thingamahoochie\WinMerge; ValueType: dword; ValueName: ContextMenuEnabled; ValueData: {code:ShellMenuEnabled}\r
619 \r
620 ;If WinMerge.exe is installed then we'll automatically configure WinMerge as the differencing application\r
621 Root: HKCU; SubKey: Software\TortoiseCVS; ValueType: string; ValueName: External Diff Application; ValueData: {app}\{code:ExeName}; Flags: uninsdeletevalue; Tasks: TortoiseCVS\r
622 Root: HKCU; SubKey: Software\TortoiseCVS; ValueType: dword; ValueName: DiffAsUnicode; ValueData: $00000001; Flags: uninsdeletevalue; Tasks: TortoiseCVS\r
623 Root: HKCU; SubKey: Software\TortoiseCVS\Prefs\External Diff Application; ValueType: string; ValueName: _; ValueData: {app}\{code:ExeName}; Flags: uninsdeletevalue dontcreatekey; Tasks: TortoiseCVS\r
624 Root: HKCU; SubKey: Software\TortoiseCVS\Prefs\External Diff2 Params; ValueType: string; ValueName: _; ValueData: """%1"" ""%2"""; Flags: uninsdeletevalue dontcreatekey; Tasks: TortoiseCVS\r
625 \r
626 ;Tells TortoiseCVS to use WinMerge as its differencing application (this happens whether or not Tortoise is current installed, that way\r
627 ;if it is installed at a later date this will automatically support it)\r
628 Root: HKCU; SubKey: Software\TortoiseCVS; ValueType: string; ValueName: External Merge Application; ValueData: {app}\{code:ExeName}; Flags: uninsdeletevalue; Tasks: TortoiseCVS\r
629 Root: HKCU; SubKey: Software\TortoiseCVS; ValueType: dword; ValueName: MergeAsUnicode; ValueData: $00000001; Flags: uninsdeletevalue; Tasks: TortoiseCVS\r
630 Root: HKCU; SubKey: Software\TortoiseCVS\Prefs\External Merge Application; ValueType: string; ValueName: _; ValueData: {app}\{code:ExeName}; Flags: uninsdeletevalue dontcreatekey; Tasks: TortoiseCVS\r
631 Root: HKCU; SubKey: Software\TortoiseCVS\Prefs\External Merge2 Params; ValueType: string; ValueName: _; ValueData: """%mine"" ""%yours"""; Flags: uninsdeletevalue dontcreatekey; Tasks: TortoiseCVS\r
632 \r
633 ;Set WinMerge as TortoiseGit diff tool\r
634 Root: HKCU; SubKey: Software\TortoiseGit; ValueType: string; ValueName: Diff; ValueData: {app}\{code:ExeName} -e -ub -dl %bname -dr %yname %base %mine; Flags: uninsdeletevalue; Tasks: TortoiseGit\r
635 Root: HKCU; SubKey: Software\TortoiseGit; ValueType: string; ValueName: Merge; ValueData: {code:TortoiseSVNGITMergeToolCommandLine}; Flags: uninsdeletevalue; Check: UseAs3WayMergeTool\r
636 \r
637 ;Set WinMerge as TortoiseSVN diff tool\r
638 Root: HKCU; SubKey: Software\TortoiseSVN; ValueType: string; ValueName: Diff; ValueData: {app}\{code:ExeName} -e -ub -dl %bname -dr %yname %base %mine; Flags: uninsdeletevalue; Tasks: TortoiseSVN\r
639 Root: HKCU; SubKey: Software\TortoiseSVN; ValueType: string; ValueName: Merge; ValueData: {code:TortoiseSVNGITMergeToolCommandLine}; Flags: uninsdeletevalue; Check: UseAs3WayMergeTool\r
640 \r
641 ;Whatever the user chooses at the [Select Setup Language] dialog should also determine what language WinMerge will start up in\r
642 ;(unless the user already has a startup language specified)\r
643 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $0000042d; Flags: deletevalue; Languages: Basque\r
644 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000402; Flags: deletevalue; Languages: Bulgarian\r
645 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000403; Flags: deletevalue; Languages: Catalan\r
646 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000804; Flags: deletevalue; Languages: Chinese_Simplified\r
647 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000404; Flags: deletevalue; Languages: Chinese_Traditional\r
648 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $0000041a; Flags: deletevalue; Languages: Croatian\r
649 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000405; Flags: deletevalue; Languages: Czech\r
650 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000406; Flags: deletevalue; Languages: Danish\r
651 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000413; Flags: deletevalue; Languages: Dutch\r
652 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000409; Flags: deletevalue; Languages: English\r
653 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $0000040c; Flags: deletevalue; Languages: French\r
654 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000456; Flags: deletevalue; Languages: Galician\r
655 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000407; Flags: deletevalue; Languages: German\r
656 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000408; Flags: deletevalue; Languages: Greek\r
657 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $0000040e; Flags: deletevalue; Languages: Hungarian\r
658 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000410; Flags: deletevalue; Languages: Italian\r
659 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000411; Flags: deletevalue; Languages: Japanese\r
660 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000412; Flags: deletevalue; Languages: Korean\r
661 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000414; Flags: deletevalue; Languages: Norwegian\r
662 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000429; Flags: deletevalue; Languages: Persian\r
663 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000415; Flags: deletevalue; Languages: Polish\r
664 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000816; Flags: deletevalue; Languages: Portuguese\r
665 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000416; Flags: deletevalue; Languages: PortugueseBrazilian\r
666 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000418; Flags: deletevalue; Languages: Romanian\r
667 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000419; Flags: deletevalue; Languages: Russian\r
668 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000c1a; Flags: deletevalue; Languages: Serbian\r
669 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $0000041b; Flags: deletevalue; Languages: Slovak\r
670 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000424; Flags: deletevalue; Languages: Slovenian\r
671 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000c0a; Flags: deletevalue; Languages: Spanish\r
672 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $0000041D; Flags: deletevalue; Languages: Swedish\r
673 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $0000041f; Flags: deletevalue; Languages: Turkish\r
674 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000422; Flags: deletevalue; Languages: Ukrainian\r
675 \r
676 \r
677 [Run]\r
678 ;This will no longer appear unless the user chose to make a start menu group in the first place\r
679 Filename: {win}\Explorer.exe; Description: {cm:ViewStartMenuFolder}; Parameters: """{group}"""; Flags: waituntilidle postinstall skipifsilent unchecked; Check: GroupCreated\r
680 \r
681 Filename: {app}\{code:ExeName}; Description: {cm:LaunchProgram, WinMerge}; Flags: nowait postinstall skipifsilent runmaximized\r
682 \r
683 \r
684 [UninstallDelete]\r
685 ;Remove 7-zip integration dlls possibly installed (by hand or using separate installer)\r
686 Name: {app}\Merge7z*.dll; Type: files\r
687 Name: {app}\7zip_pad.xml; Type: files\r
688 Name: {app}\Codecs; Type: filesandordirs\r
689 Name: {app}\Formats; Type: filesandordirs\r
690 Name: {app}\Lang; Type: filesandordirs\r
691 \r
692 Name: {group}; Type: dirifempty\r
693 Name: {app}; Type: dirifempty\r
694 \r
695 \r
696 [Code]\r
697 Var\r
698     g_CheckListBox: TNewCheckListBox;\r
699 \r
700 {Determines whether or not the user chose to create a start menu}\r
701 Function GroupCreated(): boolean;\r
702 Var\r
703     {Stores the path of the start menu group Inno Setup may have created}\r
704     strGroup_Path: string;\r
705 Begin\r
706     {Saves the path that Inno Setup intended to create the start menu group at}\r
707     strGroup_Path := ExpandConstant('{group}');\r
708 \r
709     {If the start menu path isn't blank then..}\r
710     if strGroup_Path <> '' Then\r
711         Begin\r
712             {If the user choose to create the start menu then this folder will exist.\r
713             If the folder exists then GroupCreated = True otherwise it does not.}\r
714             Result := DirExists(strGroup_Path)\r
715         end\r
716     else\r
717         {Since the start menu path is null, we know that the user chose not to create a\r
718         start menu group (note in Inno Setup 4.18 this didn't yet work, but I'm sure it will in the future}\r
719         Result := False;\r
720 \r
721      {Debug\r
722 \r
723     If DirExists(strGroup_Path) = True Then\r
724         Msgbox('The group "' + ExpandConstant('group') + '" was found', mbInformation, mb_ok)\r
725     Else\r
726         Msgbox('The group "' + ExpandConstant('group') + '" doesn''t exist.', mbInformation, mb_ok); }\r
727 End;\r
728 \r
729 \r
730 {Returns the appropriate name of the .EXE being installed}\r
731 Function ExeName(Unused: string): string;\r
732 Begin\r
733   Result := 'WinMergeU.exe';\r
734 End;\r
735 \r
736 Function FixVersion(strInput: string): string;\r
737 {Returns a version with four segments A.B.C.D}\r
738 Var\r
739   {Stores the number of periods found within the version string}\r
740   intPeriods: integer;\r
741 \r
742   {Creates a counter}\r
743   i: integer;\r
744 \r
745   {Generates the string to be returned to the user}\r
746   strVersion: string;\r
747 Begin\r
748 \r
749   {Creates a copy of the input string before we tear it apart}\r
750   strVersion := strInput;\r
751 \r
752   {Until strInput is empty do..}\r
753   While Length(strInput) > 0 do\r
754     Begin\r
755       {if the first character of the input string is a period then}\r
756       If Copy(strInput, 1, 1) = '.' Then\r
757 \r
758         {Incriment the number of periods found}\r
759         intPeriods := intPeriods + 1;\r
760 \r
761       {Remove the first character from the Input string}\r
762       strInput := Copy(strINput, 2, length(strINput));\r
763     End;\r
764 \r
765   {For every period shy of 3 do..}\r
766   For i := 1 to 3 - intperiods do\r
767 \r
768     {Add a '.0' to the version string}\r
769     strVersion := strVersion + '.0';\r
770 \r
771   {Returns the Version string with the correct number of segments}\r
772   Result := strVersion;\r
773 \r
774 End;\r
775 \r
776 Function RemoveLeadingZeros(strInput: string): string;\r
777 {Removes the leading zeros if any from a numeric string}\r
778 Begin\r
779 \r
780   {While the first character of the string is a zero}\r
781   While Copy(strInput, 1, 1) = '0' Do\r
782     begin\r
783 \r
784     {Removes one leading zero from the input string}\r
785       strInput := Copy(strInput, 2, Length(strINput));\r
786     end;\r
787 \r
788   {Returns the formatted string}\r
789   Result := strInput;\r
790 \r
791 End;\r
792 \r
793 \r
794 {Returns whether or not the version string detected is meets the version number requirement}\r
795 Function VersionAtLeast(strVersion_Installed: string; intMajor: integer; intMinor: integer; intRevision: integer; intBuild: integer): boolean;\r
796 Var\r
797 \r
798   {Stores the Major of the Version installed (X.0.0.0)}\r
799   intMajor_Installed: Integer;\r
800 \r
801   {Stores the Minor of the Version installed (1.X.0.0)}\r
802   intMinor_Installed: Integer;\r
803 \r
804   {Stores the Revision of the Version installed (1.0.X.0)}\r
805   intRevision_Installed: Integer;\r
806 \r
807   {Stores the Revision of the Version installed (1.0.0.X)}\r
808   intBuild_Installed: Integer;\r
809 \r
810   {Stores the last valid character of a particular segment (Major, Minor, Revision) of the Version string}\r
811   intEnd_Pos: Integer;\r
812 \r
813 begin\r
814   {Debug\r
815   Msgbox('The version installed is ' + strVersion_Installed + ' and the required version is ' + IntToStr(intMajor) + '.' + IntToStr(intMinor) + '.' + IntToStr(intRevision) + '.' + IntToStr(intBuild), mbINformation, mb_OK)\r
816         }\r
817 \r
818   {Makes sure the version string contains four numberic segments 5.2 ---> 5.2.0.0}\r
819   strVersion_Installed := FixVersion(strVersion_Installed);\r
820 \r
821   {If the version number is empty then quit the function}\r
822   if strVersion_Installed = '' Then\r
823     begin\r
824       Result := False;\r
825 \r
826       {Stops analyzing the version installed and returns that the version installed was inadequate}\r
827       exit;\r
828     end;\r
829 \r
830   {Starts detecting the Major value of the Version Installed}\r
831 \r
832   {Sets the end position equal to one character before the first period in the version number}\r
833   intEnd_Pos := Pos('.', strVersion_Installed) -1\r
834 \r
835   {Sets the major version equal to all character before the first period }\r
836   intMajor_installed := StrToIntDef(RemoveLeadingZeros(Copy(strVersion_Installed, 1, intEnd_Pos)), 0);\r
837 \r
838   {Debug\r
839   msgbox('The Major version installed is ' + IntToStr(intMajor_installed) + ' and the required Major is ' + IntToStr(intMajor) + '.', mbInformation, MB_OK)\r
840         }\r
841 \r
842   {If the Major Version Installed is greater than the required value then...}\r
843   if intMajor_Installed > intMajor Then\r
844     begin\r
845       {Returns that the version number was adequate, since it actually exceeded the requirement}\r
846       Result := True;\r
847 \r
848         {Debug\r
849         msgbox(IntToStr(intMajor_installed) + ' > ' +  IntToStr(intMajor), mbInformation, MB_OK)\r
850         }\r
851 \r
852       {Stops analyzing the version number since we already know it met the requirement}\r
853       exit;\r
854     end;\r
855 \r
856   {If the Major version installed is less than the requirement then...}\r
857   If intMajor_Installed < intMajor Then\r
858     begin\r
859       {Debug\r
860        msgbox(IntToStr(intMajor_installed) + ' < ' +  IntToStr(intMajor), mbInformation, MB_OK)\r
861        }\r
862 \r
863       Result := False;\r
864 \r
865       {Stops analyzing the version number since we already know it's inadequate and returns False (inadequate)}\r
866       exit;\r
867     end;\r
868 \r
869 \r
870   {Starts detecting the Minor version of the Version Installed}\r
871 \r
872   {Modifies strVersion_Installed removing the first period and everything prior to it (Removes the Major Version)}\r
873   strVersion_Installed := Copy(strVersion_Installed, intEnd_Pos + 2, Length(strVersion_Installed));\r
874 \r
875   {Sets the end position equal to one character before the first period in the version number}\r
876   intEnd_Pos := Pos('.', strVersion_Installed) -1\r
877 \r
878   {Sets the Minor version equal to all character before the first period }\r
879         intMinor_installed := StrToIntDef(RemoveLeadingZeros(Copy(strVersion_Installed, 1, intEnd_Pos)), 0)\r
880 \r
881         {Debug\r
882   msgbox('The Minor version installed is ' + IntToStr(intMinor_installed) + ' and the required Minor is ' + IntToStr(intMinor) + '.', mbInformation, MB_OK)\r
883         }\r
884 \r
885         {If the Minor Version Installed is greater than the required value then...}\r
886         If intMinor_Installed > intMinor Then\r
887     begin\r
888       {Returns that the version number was adequate}\r
889       Result := True;\r
890 \r
891       {Stops further analyzation of the version number}\r
892       exit\r
893     end;\r
894 \r
895   {If the minor installed is less than what was required}\r
896   If intMinor_Installed < intMinor Then\r
897     Begin\r
898       Result := False;\r
899 \r
900       {Returns that the version installed did not meet the required value and stops analyzing the version number}\r
901       exit;\r
902     end;\r
903 \r
904 \r
905   {Starts Detecting the Revision of the Version Installed}\r
906 \r
907         {Modifies strVersion_Installed removing the first period and everything prior to it (Removes the Minor Version)}\r
908         strVersion_Installed := Copy(strVersion_Installed, intEnd_Pos + 2, Length(strVersion_Installed));\r
909 \r
910         {Sets the last character of the Revision to last character before the first period}\r
911         intEnd_Pos := Pos('.', strVersion_Installed) -1\r
912 \r
913         {Sets the Revision Installed equal to everything before the first period}\r
914         intRevision_Installed := strToIntDef(RemoveLeadingZeros(Copy(strVersion_Installed, 1, intEnd_Pos)), 0);\r
915 \r
916         {Debug\r
917   msgbox('The Revision version installed is ' + IntToStr(intRevision_installed) + ' and the required Revision is ' + IntToStr(intRevision) + '.', mbInformation, MB_OK)\r
918         }\r
919 \r
920         {If the Revision Installed is greater than the required value then...}\r
921   If intRevision_Installed > intRevision Then\r
922     begin\r
923       {Return that the version installed was adequate}\r
924       Result := True;\r
925 \r
926       {Stops further analyzation of the version number}\r
927       exit\r
928     end;\r
929 \r
930   {If the revision installed did not meet the requirement then...}\r
931   If intRevision_Installed < intRevision Then\r
932     begin\r
933       Result := False;\r
934 \r
935     {Return that the version number failed to meet the requirement and stops further analyzation of the version number}\r
936       exit;\r
937     end;\r
938 \r
939   {Start Detection the Build Installed}\r
940 \r
941         {Modifies strVersion_Installed removing the first period and everything prior to it (Removes the Revision) leaving behind only the build number}\r
942         strVersion_Installed := Copy(strVersion_Installed, intEnd_Pos + 2, Length(strVersion_Installed));\r
943 \r
944         {Set the build installed = to what's left of the strVersion_Installed text}\r
945         intBuild_installed := strToIntDef(RemoveLeadingZeros(strVersion_Installed), 0);\r
946 \r
947         {Debug\r
948   msgbox('The Build version installed is ' + IntToStr(intBuild_installed) + ' and the required Build is ' + IntToStr(intBuild) + '.', mbInformation, MB_OK)\r
949         }\r
950 \r
951         {If the build installed is greater than or equal to the requirement then...}\r
952         if intBuild_installed >= intBuild Then\r
953 \r
954          {Report that the version installed was adequate}\r
955     Result := True\r
956   else\r
957 \r
958     {Reports the inadequacy of the version installed and seases processing }\r
959     Result := False;\r
960 end;\r
961 \r
962 \r
963 {Determines whether or not TortoiseCVS is installed}\r
964 Function TortoiseCVSInstalled(): boolean;\r
965 Begin\r
966         {This absolutely must remain as \CustomIcons, because our application used to create some TortoiseCVS keys even if the application wasn't installed!}\r
967     Result := RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE\TortoiseCVS\CustomIcons') or RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE\TortoiseCVS\Icons');\r
968 End;\r
969 \r
970 {Determines whether or not TortoiseGit is installed}\r
971 Function TortoiseGitInstalled(): boolean;\r
972 Begin\r
973     Result := RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE\TortoiseGit') or RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE\Classes\Directory\Background\shellex\ContextMenuHandlers\TortoiseGit');\r
974 End;\r
975 \r
976 {Determines whether or not TortoiseSVN is installed}\r
977 Function TortoiseSVNInstalled(): boolean;\r
978 Begin\r
979     Result := RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE\TortoiseSVN') or RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE\Classes\Directory\Background\shellex\ContextMenuHandlers\TortoiseSVN');\r
980 End;\r
981 \r
982 Function OldGroup(): string;\r
983 Begin\r
984     {Stores where in \All Users\Programs\ our start menu used to be located}\r
985      RegQueryStringValue(HKEY_LOCAL_MACHINE, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\WinMerge_is1', 'Inno Setup: Icon Group', Result)\r
986 End;\r
987 \r
988 Procedure DeletePreviousStartMenu();\r
989 Var\r
990         strOld: string;\r
991         strNew: string;\r
992         strMessage: string;\r
993         strShortcut: string;\r
994 Begin\r
995     {Detects the previous start menu group's path, if any}\r
996     strOld := OldGroup();\r
997 \r
998     {Detects the current start menu group's path, if any (not creating a group is a valid option)}\r
999     strNew := ExpandConstant('{group}');\r
1000 \r
1001     {removes the start menu portion of the path from the group path making it match the format of strOld}\r
1002     StringChange(strNew, ExpandConstant('{commonprograms}\'), '')\r
1003 \r
1004     {if the user does have a previous start menu location then..}\r
1005     If strOld <> '' Then\r
1006         Begin\r
1007             {If the current and previous start menu locations are different then...}\r
1008             If Uppercase(strOld) <> UpperCase(strNew) Then\r
1009                 Begin\r
1010                     strMessage := ExpandConstant('{cm:DeletePreviousStartMenu}');\r
1011                     strMessage := Format(strMessage, [strOld, strNew]);\r
1012 \r
1013                     {Display a dialog asking the user if they'd like to delete the previous start menu group}\r
1014                     {If they'd like to delete the previous start menu group then...}\r
1015                     If Msgbox(strMessage, mbConfirmation, mb_YesNo) = mrYes Then\r
1016                         Begin\r
1017                             strOld := ExpandConstant('{commonprograms}\') + strOld;\r
1018                             {Remove old start menu}\r
1019                             DelTree(strOld, True, True, True);\r
1020                         End;\r
1021                 End;\r
1022         End;\r
1023 End;\r
1024 \r
1025 {This event procedure is queed each time the user changes pages within the installer}\r
1026 Procedure CurPageChanged(CurPage: integer);\r
1027 Begin\r
1028     {if the installer reaches the file copy page then...}\r
1029     If CurPage = wpInstalling Then\r
1030             {Delete the previous start menu group if the location has changed since the last install}\r
1031             DeletePreviousStartMenu;\r
1032 End;\r
1033 \r
1034 // Checks if context menu is already enabled for shell extension\r
1035 // If so, we won't overwrite its existing value in [Registry] section\r
1036 Function ShellMenuEnabled(Unused: string): string;\r
1037 Var\r
1038   ContextMenuEnabled: DWORD;\r
1039 Begin\r
1040   ContextMenuEnabled := 0;\r
1041   RegQueryDWORDValue(HKCU, 'Software\Thingamahoochie\WinMerge', 'ContextMenuEnabled', ContextMenuEnabled);\r
1042   if IsTaskSelected('ShellExtension') then\r
1043     Result := inttostr(ContextMenuEnabled or 1)\r
1044   else\r
1045     Result := '0';\r
1046 End;\r
1047 \r
1048 {Replace one occurrence of OldStr in Str with NewStr}\r
1049 Function ReplaceSubString(Src: string; OldStr: string; NewStr: string) : string;\r
1050 Var\r
1051     OldStrStartAt: Integer;\r
1052 \r
1053 Begin\r
1054     OldStrStartAt := Pos(OldStr, Src);\r
1055     if OldStrStartAt > 0 then\r
1056     begin\r
1057         {Remove old string}\r
1058         Delete(Src, OldStrStartAt, Length(OldStr));\r
1059         {Insert new string}\r
1060         Insert(NewStr, Src, OldStrStartAt);\r
1061     end;\r
1062     Result := Src;\r
1063 End;\r
1064 \r
1065 {Returns WinMerge installed exeutable file name}\r
1066 Function WinMergeExeName(): string;\r
1067 Var\r
1068         Unused: String;\r
1069 \r
1070 Begin\r
1071     Result := ExpandConstant('{app}\') + ExeName(Unused);\r
1072 End;\r
1073 \r
1074 {Returns ClearCase external tools configuration file name}\r
1075 Function ClearCaseMapFile(): string;\r
1076 Begin\r
1077     if not RegQueryStringValue(HKEY_LOCAL_MACHINE, 'SOFTWARE\Rational Software\', 'RSINSTALLDIR', Result) then\r
1078     begin\r
1079         Result := {pf} + '\Rational\';\r
1080     end;\r
1081     Result := Result + 'ClearCase\lib\mgrs\map';\r
1082 End;\r
1083 \r
1084 {Determines whether or not Rational ClearCase is installed}\r
1085 Function ClearCaseInstalled(): boolean;\r
1086 Begin\r
1087     Result := FileExists(ClearCaseMapFile());\r
1088 End;\r
1089 \r
1090 {Intergrate WinMerge as ClearCase external diff tool}\r
1091 Procedure IntegrateClearCase(OldExe: String; NewExe: String);\r
1092 Var\r
1093     MapFile: TStringList;\r
1094     FileName: String;\r
1095     I: Integer;\r
1096     BakFile: String;\r
1097 \r
1098 Begin\r
1099     FileName := ClearCaseMapFile();\r
1100     {Create a backup file of the original file first time it gets modified}\r
1101     BakFile := FileName + '.original';\r
1102     if not FileExists(BakFile) then\r
1103     begin\r
1104         FileCopy(FileName, BakFile, True);\r
1105     end;\r
1106     MapFile := TStringList.Create();\r
1107     {Read the entire map file to a string list}\r
1108     MapFile.LoadFromFile(FileName);\r
1109     if MapFile.Count > 0 then\r
1110     begin\r
1111         for I := 0 to MapFile.Count do\r
1112         begin\r
1113             {Search for the 'text_file_delta xcompare ...' line}\r
1114                         if (MapFile.Strings[I][1] <> ';') and (Pos('text_file_delta', MapFile.Strings[I]) > 0) and (Pos('xcompare', MapFile.Strings[I]) > 0) then\r
1115                         begin\r
1116                                 {Replace old executable name with a new executable name}\r
1117                                 MapFile.Strings[I] := ReplaceSubString(MapFile.Strings[I], OldExe, NewExe);\r
1118                             break;\r
1119                         end;\r
1120                 end;\r
1121                 { Save the modified file. }\r
1122                 MapFile.SaveToFile(FileName);\r
1123         end;\r
1124 End;\r
1125 \r
1126 // Add WinMerge to system path.\r
1127 // This requires certain order of things to work:\r
1128 // #1 ModPathDir function must be first (it gets called by others)\r
1129 // #2 include of modpath.iss so modpath code gets included\r
1130 // #3 CurStepChanged and CurUninstallStepChanged procedures as they call\r
1131 //    ModPath (in modpath.iss)\r
1132 function ModPathDir(): TArrayOfString;\r
1133 var\r
1134     Dir:        TArrayOfString;\r
1135 begin\r
1136     setArrayLength(Dir, 1)\r
1137         Dir[0] := ExpandConstant('{app}');\r
1138         Result := Dir;\r
1139 end;\r
1140 \r
1141 function UseAs3WayMergeTool(): Boolean;\r
1142 begin\r
1143     Result := g_CheckListBox.Checked[0];\r
1144 end;\r
1145 \r
1146 function TortoiseSVNGITMergeToolCommandLine(Unused: string): string;\r
1147 var\r
1148     lmr: string;\r
1149     Args: string;\r
1150 begin\r
1151     if g_CheckListBox.Checked[1] then begin\r
1152         lmr := 'r';\r
1153         Args := '/e /ub /fr /wl /wm /dl %bname /dm %tname /dr %yname  %base %theirs %mine /o %merged';\r
1154     end else if g_CheckListBox.Checked[2] then begin\r
1155         lmr := 'm';\r
1156         Args := '/e /ub /fm /wl /wr /dl %tname /dm %bname /dr %yname  %theirs %base %mine /o %merged';\r
1157     end else begin\r
1158         lmr := 'l';\r
1159         Args := '/e /ub /fl /wm /wr /dl %yname /dm %tname /dr %bname  %mine %theirs %base /o %merged';\r
1160     end;\r
1161     if g_CheckListBox.Checked[4] then begin\r
1162         Args := Args + ' /a' + lmr;\r
1163     end;\r
1164     Result := WinMergeExeName() + ' ' + Args;\r
1165 end;\r
1166 \r
1167 function ThreeWayMergePage_ShouldSkipPage(Page: TWizardPage): Boolean;\r
1168 begin\r
1169     Result := not (IsTaskSelected('TortoiseSVN') or IsTaskSelected('TortoiseGIT'));\r
1170 end;\r
1171 \r
1172 #include "modpath.iss"\r
1173 \r
1174 procedure CurStepChanged(CurStep: TSetupStep);\r
1175 Begin\r
1176     if CurStep = ssPostInstall then\r
1177     begin\r
1178                 if IsTaskSelected('modifypath') then\r
1179                         ModPath();\r
1180         if IsTaskSelected('ClearCase') then\r
1181         begin\r
1182             IntegrateClearCase('..\..\bin\cleardiffmrg.exe', WinMergeExeName());\r
1183         end;\r
1184     end;\r
1185 End;\r
1186 \r
1187 Procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);\r
1188 var\r
1189         appdir:                 String;\r
1190         selectedTasks:  AnsiString;\r
1191 Begin\r
1192         appdir := ExpandConstant('{app}')\r
1193         if CurUninstallStep = usUninstall then begin\r
1194                 if LoadStringFromFile(appdir + '\uninsTasks.txt', selectedTasks) then\r
1195                         if Pos('modifypath', selectedTasks) > 0 then\r
1196                                 ModPath();\r
1197                 DeleteFile(appdir + '\uninsTasks.txt')\r
1198         end;\r
1199 \r
1200     if CurUninstallStep = usPostUninstall then\r
1201     begin\r
1202       if ClearCaseInstalled() then\r
1203         IntegrateClearCase(WinMergeExeName(), '..\..\bin\cleardiffmrg.exe');\r
1204     end;\r
1205 End;\r
1206 \r
1207 function BooleanToString(Value : Boolean) : String; \r
1208 begin\r
1209   if Value then\r
1210     Result := 'true'\r
1211   else\r
1212     Result := 'false';\r
1213 end;\r
1214 \r
1215 function StringToBoolean(Value : String) : Boolean; \r
1216 begin\r
1217   if Value = 'true' then\r
1218     Result := true\r
1219   else\r
1220     Result := false;\r
1221 end;\r
1222 \r
1223 procedure RegisterPreviousData(PreviousDataKey: Integer);\r
1224 begin\r
1225   SetPreviousData(PreviousDataKey, 'UseAs3WayMergeTool', BooleanToString(g_CheckListBox.Checked[0]));\r
1226   SetPreviousData(PreviousDataKey, 'MergeAtRightPane', BooleanToString(g_CheckListBox.Checked[1]));\r
1227   SetPreviousData(PreviousDataKey, 'MergeAtCenterPane', BooleanToString(g_CheckListBox.Checked[2]));\r
1228   SetPreviousData(PreviousDataKey, 'MergeAtLeftPane', BooleanToString(g_CheckListBox.Checked[3]));\r
1229   SetPreviousData(PreviousDataKey, 'AutoMergeAtStartup', BooleanToString(g_CheckListBox.Checked[4]));\r
1230 end;\r
1231 \r
1232 function GetSysColor(ColorType: Integer): Integer;\r
1233 external 'GetSysColor@user32.dll';\r
1234 \r
1235 procedure InitializeWizard();\r
1236 var\r
1237   Page: TWizardPage;\r
1238 begin\r
1239   Page := CreateCustomPage(wpSelectTasks, ExpandConstant('{cm:ThreeWayMergeWizardPageCaption}'), ExpandConstant('{cm:ThreeWayMergeWizardPageDescription}'));\r
1240   Page.OnShouldSkipPage := @ThreeWayMergePage_ShouldSkipPage;\r
1241 \r
1242   g_CheckListBox := TNewCheckListBox.Create(Page);\r
1243   g_CheckListBox.Width := Page.SurfaceWidth;\r
1244   g_CheckListBox.Height := ScaleY(128);\r
1245   g_CheckListBox.Flat := True;\r
1246   g_CheckListBox.BorderStyle := bsNone;\r
1247   g_CheckListBox.Color := GetSysColor(15);\r
1248   g_CheckListBox.Parent := Page.Surface;\r
1249   g_CheckListBox.AddCheckBox(ExpandConstant('{cm:RegisterWinMergeAs3WayMergeTool}'), '', 0, StringToBoolean(GetPreviousData('UseAs3WayMergeTool', 'true')), True, False, True, nil);\r
1250   g_CheckListBox.AddRadioButton(ExpandConstant('{cm:MergeAtRightPane}'), '', 1, StringToBoolean(GetPreviousData('MergeAtRightPane', 'true')), True, nil);\r
1251   g_CheckListBox.AddRadioButton(ExpandConstant('{cm:MergeAtCenterPane}'), '', 1, StringToBoolean(GetPreviousData('MergeAtCenterPane', 'false')), True, nil);\r
1252   g_CheckListBox.AddRadioButton(ExpandConstant('{cm:MergeAtLeftPane}'), '', 1, StringToBoolean(GetPreviousData('MergeAtLeftPane', 'false')), True, nil);\r
1253   g_CheckListBox.AddCheckBox(ExpandConstant('{cm:AutoMergeAtStartup}'), '', 1, StringToBoolean(GetPreviousData('AutoMergeAtStartup', 'true')), True, False, True, nil);\r
1254 end;\r