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
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
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
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
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
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
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
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
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
59 AppVersion={#AppVersion}
\r
60 AppVerName=WinMerge {#AppVersion}
\r
61 AppPublisher=Thingamahoochie Software
\r
62 AppPublisherURL=http://www.geocities.co.jp/SiliconValley-SanJose/8165/
\r
63 AppSupportURL=http://www.geocities.co.jp/SiliconValley-SanJose/8165/
\r
64 AppUpdatesURL=http://www.geocities.co.jp/SiliconValley-SanJose/8165/
\r
66 ; Installer executable's version resource info
\r
67 VersionInfoCompany=http://www.geocities.co.jp/SiliconValley-SanJose/8165/
\r
68 VersionInfoDescription=WinMerge Installer
\r
69 VersionInfoVersion={#AppVersion}
\r
71 ;This is in case an older version of the installer happened to be
\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
77 DefaultDirName={pf}\WinMerge
\r
78 DefaultGroupName=WinMerge
\r
79 DisableStartupPrompt=true
\r
81 InfoBeforeFile=..\..\Docs\users\GPL.rtf
\r
82 InfoAfterFile=..\..\Docs\users\ReadMe.txt
\r
84 OutputBaseFilename=WinMerge-{#AppVersion}-Setup
\r
86 ;This must be admin to install C++ Runtimes and shell extension
\r
87 PrivilegesRequired=admin
\r
89 ;Windows 2000 or later required
\r
92 UninstallDisplayIcon={app}\{code:ExeName}
\r
95 WizardImageFile=Art\Large Logo.bmp
\r
96 WizardSmallImageFile=Art\Small Logo.bmp
\r
97 WizardImageStretch=true
\r
99 ;It is confusing, if Setup/Uninstall use the same icon like WinMerge!
\r
100 ;SetupIconFile=..\..\src\res\Merge.ico
\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
110 ; Update file associations for shell (project files)
\r
111 ChangesAssociations=true
\r
113 ChangesEnvironment=true
\r
114 OutputDir=..\..\Build
\r
115 AlwaysShowComponentsList=true
\r
117 SignTool=signbat $f
\r
118 SignedUninstaller=yes
\r
121 ;Inno Setup's Native Language
\r
122 Name: English; MessagesFile: ..\..\Translations\InnoSetup\English.isl
\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
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
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
173 ; Executable, libraries, documentation
\r
174 Name: Core; Description: {cm:AppCoreFiles}; Types: full custom typical compact; Flags: fixed
\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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
304 Name: {app}\Merge7z311.dll; Type: files
\r
305 Name: {app}\Merge7z311U.dll; Type: files; MinVersion: 0, 4
\r
307 Name: {app}\Merge7z312.dll; Type: files
\r
308 Name: {app}\Merge7z312U.dll; Type: files; MinVersion: 0, 4
\r
310 Name: {app}\Merge7z313.dll; Type: files
\r
311 Name: {app}\Merge7z313U.dll; Type: files; MinVersion: 0, 4
\r
313 Name: {app}\Merge7z420.dll; Type: files
\r
314 Name: {app}\Merge7z420U.dll; Type: files; MinVersion: 0, 4
\r
316 Name: {app}\Merge7z423.dll; Type: files
\r
317 Name: {app}\Merge7z423U.dll; Type: files; MinVersion: 0, 4
\r
319 Name: {app}\Merge7z431.dll; Type: files
\r
320 Name: {app}\Merge7z431U.dll; Type: files; MinVersion: 0, 4
\r
322 Name: {app}\Merge7z432.dll; Type: files
\r
323 Name: {app}\Merge7z432U.dll; Type: files; MinVersion: 0, 4
\r
325 Name: {app}\Merge7z442.dll; Type: files
\r
326 Name: {app}\Merge7z442U.dll; Type: files; MinVersion: 0, 4
\r
328 Name: {app}\Merge7z457.dll; Type: files
\r
329 Name: {app}\Merge7z457U.dll; Type: files; MinVersion: 0, 4
\r
331 Name: {app}\Merge7z465.dll; Type: files
\r
332 Name: {app}\Merge7z465U.dll; Type: files; MinVersion: 0, 4
\r
334 Name: {app}\Merge7z920.dll; Type: files
\r
335 Name: {app}\Merge7z920U.dll; Type: files; MinVersion: 0, 4
\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
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
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
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
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
379 ;Removes the Uninstall icon from the start menu...
\r
380 Name: {group}\{cm:UninstallProgram,WinMerge}.lnk; Type: files;
\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
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
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
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
416 Source: ..\..\Build\MergeUnicodeRelease\WinMergeU.exe; DestDir: {app}; Flags: promptifolder; Components: Core
\r
418 ; List of installed files
\r
419 Source: ..\..\Docs\Users\Files.txt; DestDir: {app}; Flags: promptifolder; Components: Core
\r
422 Source: ..\..\Build\ShellExtensionUnicode Release MinDependency\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\X64\ShellExtensionUnicode Release MinDependency\ShellExtensionX64.dll; DestDir: {app}; Flags: regserver uninsrestartdelete restartreplace promptifolder 64bit; MinVersion: 0,5.01.2600; Check: IsWin64
\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\MergeUnicodeRelease\Merge7z\Merge7z1604U.dll; DestDir: {app}\Merge7z; Flags: promptifolder; MinVersion: 0, 4; Components: ArchiveSupport
\r
428 Source: ..\..\Build\MergeUnicodeRelease\Merge7z\7z.dll; DestDir: {app}\Merge7z; Flags: promptifolder; MinVersion: 0, 4; Components: ArchiveSupport
\r
429 Source: ..\..\Build\MergeUnicodeRelease\Merge7z\*.txt; DestDir: {app}\Merge7z; Flags: promptifolder; MinVersion: 0, 4; Components: ArchiveSupport
\r
430 Source: ..\..\Build\MergeUnicodeRelease\Merge7z\Lang\*.txt; DestDir: {app}\Merge7z\Lang; Flags: promptifolder; MinVersion: 0, 4; Components: ArchiveSupport
\r
432 ; MergeLang.dll - translation helper dll
\r
433 Source: ..\..\Build\MergeUnicodeRelease\MergeLang.dll; DestDir: {app}; Flags: promptifolder ignoreversion; Components: Core
\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
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
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
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: promptifolder; Components: Plugins
\r
507 Source: ..\..\Plugins\dlls\IgnoreCommentsC.dll; DestDir: {app}\MergePlugins; Flags: promptifolder; Components: Plugins
\r
508 Source: ..\..\Plugins\dlls\IgnoreFieldsComma.dll; DestDir: {app}\MergePlugins; Flags: promptifolder; Components: Plugins
\r
509 Source: ..\..\Plugins\dlls\IgnoreFieldsTab.dll; DestDir: {app}\MergePlugins; Flags: promptifolder; Components: Plugins
\r
510 Source: ..\..\Plugins\dlls\IgnoreLeadingLineNumbers.dll; DestDir: {app}\MergePlugins; Flags: promptifolder; Components: Plugins
\r
513 Source: ..\..\Externals\frhed\GPL.txt; DestDir: {app}\Frhed; Components: Frhed
\r
514 ;Source: ..\..\Externals\frhed\Build\FRHED_vc10\Win32\UnicodeRelease\frhed.exe; DestDir: {app}\Frhed; Components: Frhed
\r
515 Source: ..\..\Externals\frhed\Build\FRHED_vc10\Win32\UnicodeRelease\hekseditU.dll; DestDir: {app}\Frhed; Components: Frhed
\r
516 Source: ..\..\Externals\frhed\Build\FRHED_vc10\Win32\UnicodeRelease\Docs\ChangeLog.txt; DestDir: {app}\Frhed\Docs; Components: Frhed
\r
517 Source: ..\..\Externals\frhed\Build\FRHED_vc10\Win32\UnicodeRelease\Docs\Contributors.txt; DestDir: {app}\Frhed\Docs; Components: Frhed
\r
518 Source: ..\..\Externals\frhed\Build\FRHED_vc10\Win32\UnicodeRelease\Docs\History.txt; DestDir: {app}\Frhed\Docs; Components: Frhed
\r
519 Source: ..\..\Externals\frhed\Build\FRHED_vc10\Win32\UnicodeRelease\Docs\Links.txt; DestDir: {app}\Frhed\Docs; Components: Frhed
\r
520 Source: ..\..\Externals\frhed\Build\FRHED_vc10\Win32\UnicodeRelease\Docs\Sample.tpl ; DestDir: {app}\Frhed\Docs; Components: Frhed
\r
521 Source: ..\..\Externals\frhed\Build\FRHED_vc10\Win32\UnicodeRelease\Languages\de.po; DestDir: {app}\Frhed\Languages; Components: Frhed
\r
522 Source: ..\..\Externals\frhed\Build\FRHED_vc10\Win32\UnicodeRelease\Languages\fr.po; DestDir: {app}\Frhed\Languages; Components: Frhed
\r
523 Source: ..\..\Externals\frhed\Build\FRHED_vc10\Win32\UnicodeRelease\Languages\ja.po; DestDir: {app}\Frhed\Languages; Components: Frhed
\r
524 Source: ..\..\Externals\frhed\Build\FRHED_vc10\Win32\UnicodeRelease\Languages\nl.po; DestDir: {app}\Frhed\Languages; Components: Frhed
\r
525 Source: ..\..\Externals\frhed\Build\FRHED_vc10\Win32\UnicodeRelease\Languages\heksedit.lng; DestDir: {app}\Frhed\Languages; Components: Frhed
\r
528 Source: ..\..\Externals\winimerge\GPL.txt; DestDir: {app}\WinIMerge; Components: WinIMerge
\r
529 Source: ..\..\Externals\winimerge\freeimage-license-gplv2.txt; DestDir: {app}\WinIMerge; Components: WinIMerge
\r
530 ;Source: ..\..\Externals\winimerge\Build\Release\WinIMerge.exe; DestDir: {app}\WinIMerge; Components: WinIMerge
\r
531 Source: ..\..\Externals\winimerge\Build\Release\WinIMergeLib.dll; DestDir: {app}\WinIMerge; Components: WinIMerge
\r
532 Source: {#VS120COMNTOOLS}\..\..\VC\redist\x86\Microsoft.VC120.OpenMP\vcomp120.dll; DestDir: {app}; Components: WinIMerge
\r
533 Source: {#VS140COMNTOOLS}\..\..\VC\redist\x86\Microsoft.VC140.OpenMP\vcomp140.dll; DestDir: {app}; Components: WinIMerge
\r
535 ;GnuWin32 Patch for Windows
\r
536 Source: C:\Program Files\WinMerge\GnuWin32\*.*; DestDir: {app}\GnuWin32; Flags: recursesubdirs; Components: Patch
\r
539 Name: "{app}\MergePlugins"
\r
543 Name: {group}\WinMerge; Filename: {app}\{code:ExeName}; AppUserModelID: "Thingamahoochie.WinMerge"
\r
544 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe.txt; IconFileName: {win}\NOTEPAD.EXE
\r
545 Name: {group}\{cm:UsersGuide}; Filename: {app}\Docs\WinMerge.chm
\r
546 Name: {group}\{cm:UninstallProgram,WinMerge}; Filename: {uninstallexe}
\r
547 Name: {group}\{cm:ProgramOnTheWeb,WinMerge}; Filename: http://www.geocities.co.jp/SiliconValley-SanJose/8165/
\r
549 ;Link to translated ReadMe in Start Menu
\r
550 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Basque.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Basque
\r
551 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Brazilian.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: PortugueseBrazilian
\r
552 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Bulgarian.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Bulgarian
\r
553 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Catalan.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Catalan
\r
554 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-ChineseSimplified.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Chinese_Simplified
\r
555 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-ChineseTraditional.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Chinese_Traditional
\r
556 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Croatian.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Croatian
\r
557 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Dutch.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Dutch
\r
558 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-French.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: French
\r
559 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Galician.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Galician
\r
560 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Greek.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Greek
\r
561 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Japanese.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Japanese
\r
562 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Romanian.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Romanian
\r
563 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Serbian.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Serbian
\r
564 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Spanish.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Spanish
\r
565 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Swedish.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Swedish
\r
566 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Turkish.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Turkish
\r
567 Name: {group}\{cm:ReadMe}; Filename: {app}\Docs\ReadMe-Ukrainian.txt; IconFileName: {win}\NOTEPAD.EXE; Languages: Ukrainian
\r
570 Name: {commondesktop}\WinMerge; Filename: {app}\{code:ExeName}; Tasks: desktopicon
\r
573 Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\WinMerge; Filename: {app}\{code:ExeName}; Tasks: quicklaunchicon
\r
576 Root: HKCU; Subkey: Software\Thingamahoochie; Flags: uninsdeletekeyifempty
\r
577 Root: HKCU; Subkey: Software\Thingamahoochie\WinMerge; Flags: uninsdeletekey
\r
578 Root: HKLM; Subkey: Software\Thingamahoochie; Flags: uninsdeletekeyifempty
\r
579 Root: HKLM; Subkey: Software\Thingamahoochie\WinMerge; Flags: uninsdeletekey
\r
581 ;Add Project file extension (.WinMerge) to known extensions and
\r
582 ;set WinMerge to open those files
\r
583 ;set Notepad to edit project files
\r
584 Root: HKCR; Subkey: .WinMerge; ValueType: String; ValueData: WinMerge.Project.File; Flags: uninsdeletekey
\r
585 Root: HKCR; Subkey: WinMerge.Project.File; ValueType: String; ValueData: {cm:ProjectFileDesc}; Flags: uninsdeletekey
\r
586 Root: HKCR; Subkey: WinMerge.Project.File\shell\open\command; ValueType: String; ValueData: """{app}\{code:ExeName}"" ""%1"""; Flags: uninsdeletekey
\r
587 Root: HKCR; Subkey: WinMerge.Project.File\shell\edit\command; ValueType: String; ValueData: """NOTEPAD.EXE"" ""%1"""; Flags: uninsdeletekey
\r
588 Root: HKCR; Subkey: WinMerge.Project.File\DefaultIcon; ValueType: String; ValueData: """{app}\{code:ExeName}"",1"; Flags: uninsdeletekey
\r
590 ; delete obsolete values
\r
591 ;In Inno Setup Version 4.18 ValueData couldn't be null and compile,
\r
592 ;if this is fixed in a later version feel free to remove the parameter
\r
593 Root: HKCU; Subkey: Software\Thingamahoochie\WinMerge\Settings; ValueType: none; ValueName: LeftMax; Flags: deletevalue
\r
594 Root: HKCU; Subkey: Software\Thingamahoochie\WinMerge\Settings; ValueType: none; ValueName: DirViewMax; Flags: deletevalue
\r
596 ;This removes the key that remembers which messageboxes to hide from the user, this is because the text of that message
\r
597 ;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
598 ;because a particular message might be added or removed and a new message might occupy a previous message's ID number
\r
599 Root: HKLM; Subkey: Software\Thingamahoochie\WinMerge\MessageBoxes; ValueType: none; Flags: deletekey
\r
601 Root: HKCR; SubKey: Directory\Shell\WinMerge\command; ValueType: none; Flags: deletekey noerror
\r
602 Root: HKCR; SubKey: Directory\Shell\WinMerge; ValueType: none; Flags: deletekey noerror
\r
604 ;Adds "Start Menu" --> "Run" Support for WinMerge
\r
605 Root: HKLM; Subkey: Software\Microsoft\Windows\CurrentVersion\App Paths\WinMerge.exe; ValueType: none; Flags: uninsdeletekey
\r
606 Root: HKLM; Subkey: Software\Microsoft\Windows\CurrentVersion\App Paths\WinMergeU.exe; ValueType: none; Flags: uninsdeletekey
\r
607 Root: HKLM; SubKey: SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\WinMerge.exe; ValueType: string; ValueName: ; ValueData: {app}\{code:ExeName}
\r
608 Root: HKLM; SubKey: SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\WinMergeU.exe; ValueType: string; ValueName: ; ValueData: {app}\{code:ExeName}
\r
610 ;Registry Keys for use by ShellExtension.dll
\r
611 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge; ValueType: string; ValueName: Executable; ValueData: {app}\{code:ExeName}
\r
613 ;Enables or disables the Context Menu preference based on what the user selects during install
\r
614 ;Initially the Context menu is explicitly disabled:
\r
615 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge; ValueType: dword; ValueName: ContextMenuEnabled; ValueData: 0;
\r
617 ;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
618 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge; ValueType: dword; ValueName: ContextMenuEnabled; ValueData: 1; Tasks: ShellExtension
\r
619 Root: HKCU; SubKey: Software\Thingamahoochie\WinMerge; ValueType: dword; ValueName: ContextMenuEnabled; ValueData: {code:ShellMenuEnabled}
\r
621 ;If WinMerge.exe is installed then we'll automatically configure WinMerge as the differencing application
\r
622 Root: HKCU; SubKey: Software\TortoiseCVS; ValueType: string; ValueName: External Diff Application; ValueData: {app}\{code:ExeName}; Flags: uninsdeletevalue; Tasks: TortoiseCVS
\r
623 Root: HKCU; SubKey: Software\TortoiseCVS; ValueType: dword; ValueName: DiffAsUnicode; ValueData: $00000001; Flags: uninsdeletevalue; Tasks: TortoiseCVS
\r
624 Root: HKCU; SubKey: Software\TortoiseCVS\Prefs\External Diff Application; ValueType: string; ValueName: _; ValueData: {app}\{code:ExeName}; Flags: uninsdeletevalue dontcreatekey; Tasks: TortoiseCVS
\r
625 Root: HKCU; SubKey: Software\TortoiseCVS\Prefs\External Diff2 Params; ValueType: string; ValueName: _; ValueData: """%1"" ""%2"""; Flags: uninsdeletevalue dontcreatekey; Tasks: TortoiseCVS
\r
627 ;Tells TortoiseCVS to use WinMerge as its differencing application (this happens whether or not Tortoise is current installed, that way
\r
628 ;if it is installed at a later date this will automatically support it)
\r
629 Root: HKCU; SubKey: Software\TortoiseCVS; ValueType: string; ValueName: External Merge Application; ValueData: {app}\{code:ExeName}; Flags: uninsdeletevalue; Tasks: TortoiseCVS
\r
630 Root: HKCU; SubKey: Software\TortoiseCVS; ValueType: dword; ValueName: MergeAsUnicode; ValueData: $00000001; Flags: uninsdeletevalue; Tasks: TortoiseCVS
\r
631 Root: HKCU; SubKey: Software\TortoiseCVS\Prefs\External Merge Application; ValueType: string; ValueName: _; ValueData: {app}\{code:ExeName}; Flags: uninsdeletevalue dontcreatekey; Tasks: TortoiseCVS
\r
632 Root: HKCU; SubKey: Software\TortoiseCVS\Prefs\External Merge2 Params; ValueType: string; ValueName: _; ValueData: """%mine"" ""%yours"""; Flags: uninsdeletevalue dontcreatekey; Tasks: TortoiseCVS
\r
634 ;Set WinMerge as TortoiseGit diff tool
\r
635 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
636 Root: HKCU; SubKey: Software\TortoiseGit; ValueType: string; ValueName: Merge; ValueData: {code:TortoiseSVNGITMergeToolCommandLine}; Flags: uninsdeletevalue; Check: UseAs3WayMergeTool
\r
638 ;Set WinMerge as TortoiseSVN diff tool
\r
639 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
640 Root: HKCU; SubKey: Software\TortoiseSVN; ValueType: string; ValueName: Merge; ValueData: {code:TortoiseSVNGITMergeToolCommandLine}; Flags: uninsdeletevalue; Check: UseAs3WayMergeTool
\r
642 ;Whatever the user chooses at the [Select Setup Language] dialog should also determine what language WinMerge will start up in
\r
643 ;(unless the user already has a startup language specified)
\r
644 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $0000042d; Flags: deletevalue; Languages: Basque
\r
645 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000402; Flags: deletevalue; Languages: Bulgarian
\r
646 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000403; Flags: deletevalue; Languages: Catalan
\r
647 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000804; Flags: deletevalue; Languages: Chinese_Simplified
\r
648 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000404; Flags: deletevalue; Languages: Chinese_Traditional
\r
649 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $0000041a; Flags: deletevalue; Languages: Croatian
\r
650 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000405; Flags: deletevalue; Languages: Czech
\r
651 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000406; Flags: deletevalue; Languages: Danish
\r
652 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000413; Flags: deletevalue; Languages: Dutch
\r
653 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000409; Flags: deletevalue; Languages: English
\r
654 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $0000040c; Flags: deletevalue; Languages: French
\r
655 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000456; Flags: deletevalue; Languages: Galician
\r
656 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000407; Flags: deletevalue; Languages: German
\r
657 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000408; Flags: deletevalue; Languages: Greek
\r
658 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $0000040e; Flags: deletevalue; Languages: Hungarian
\r
659 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000410; Flags: deletevalue; Languages: Italian
\r
660 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000411; Flags: deletevalue; Languages: Japanese
\r
661 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000412; Flags: deletevalue; Languages: Korean
\r
662 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000414; Flags: deletevalue; Languages: Norwegian
\r
663 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000429; Flags: deletevalue; Languages: Persian
\r
664 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000415; Flags: deletevalue; Languages: Polish
\r
665 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000816; Flags: deletevalue; Languages: Portuguese
\r
666 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000416; Flags: deletevalue; Languages: PortugueseBrazilian
\r
667 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000418; Flags: deletevalue; Languages: Romanian
\r
668 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000419; Flags: deletevalue; Languages: Russian
\r
669 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000c1a; Flags: deletevalue; Languages: Serbian
\r
670 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $0000041b; Flags: deletevalue; Languages: Slovak
\r
671 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000424; Flags: deletevalue; Languages: Slovenian
\r
672 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000c0a; Flags: deletevalue; Languages: Spanish
\r
673 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $0000041D; Flags: deletevalue; Languages: Swedish
\r
674 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $0000041f; Flags: deletevalue; Languages: Turkish
\r
675 Root: HKLM; SubKey: Software\Thingamahoochie\WinMerge\Locale; ValueType: dword; ValueName: LanguageId; ValueData: $00000422; Flags: deletevalue; Languages: Ukrainian
\r
679 ;This will no longer appear unless the user chose to make a start menu group in the first place
\r
680 Filename: {win}\Explorer.exe; Description: {cm:ViewStartMenuFolder}; Parameters: """{group}"""; Flags: waituntilidle postinstall skipifsilent unchecked; Check: GroupCreated
\r
682 Filename: {app}\{code:ExeName}; Description: {cm:LaunchProgram, WinMerge}; Flags: nowait postinstall skipifsilent runmaximized
\r
686 ;Remove 7-zip integration dlls possibly installed (by hand or using separate installer)
\r
687 Name: {app}\Merge7z*.dll; Type: files
\r
688 Name: {app}\7zip_pad.xml; Type: files
\r
689 Name: {app}\Codecs; Type: filesandordirs
\r
690 Name: {app}\Formats; Type: filesandordirs
\r
691 Name: {app}\Lang; Type: filesandordirs
\r
693 Name: {group}; Type: dirifempty
\r
694 Name: {app}; Type: dirifempty
\r
699 g_CheckListBox: TNewCheckListBox;
\r
701 {Determines whether or not the user chose to create a start menu}
\r
702 Function GroupCreated(): boolean;
\r
704 {Stores the path of the start menu group Inno Setup may have created}
\r
705 strGroup_Path: string;
\r
707 {Saves the path that Inno Setup intended to create the start menu group at}
\r
708 strGroup_Path := ExpandConstant('{group}');
\r
710 {If the start menu path isn't blank then..}
\r
711 if strGroup_Path <> '' Then
\r
713 {If the user choose to create the start menu then this folder will exist.
\r
714 If the folder exists then GroupCreated = True otherwise it does not.}
\r
715 Result := DirExists(strGroup_Path)
\r
718 {Since the start menu path is null, we know that the user chose not to create a
\r
719 start menu group (note in Inno Setup 4.18 this didn't yet work, but I'm sure it will in the future}
\r
724 If DirExists(strGroup_Path) = True Then
\r
725 Msgbox('The group "' + ExpandConstant('group') + '" was found', mbInformation, mb_ok)
\r
727 Msgbox('The group "' + ExpandConstant('group') + '" doesn''t exist.', mbInformation, mb_ok); }
\r
731 {Returns the appropriate name of the .EXE being installed}
\r
732 Function ExeName(Unused: string): string;
\r
734 Result := 'WinMergeU.exe';
\r
737 Function FixVersion(strInput: string): string;
\r
738 {Returns a version with four segments A.B.C.D}
\r
740 {Stores the number of periods found within the version string}
\r
741 intPeriods: integer;
\r
743 {Creates a counter}
\r
746 {Generates the string to be returned to the user}
\r
747 strVersion: string;
\r
750 {Creates a copy of the input string before we tear it apart}
\r
751 strVersion := strInput;
\r
753 {Until strInput is empty do..}
\r
754 While Length(strInput) > 0 do
\r
756 {if the first character of the input string is a period then}
\r
757 If Copy(strInput, 1, 1) = '.' Then
\r
759 {Incriment the number of periods found}
\r
760 intPeriods := intPeriods + 1;
\r
762 {Remove the first character from the Input string}
\r
763 strInput := Copy(strINput, 2, length(strINput));
\r
766 {For every period shy of 3 do..}
\r
767 For i := 1 to 3 - intperiods do
\r
769 {Add a '.0' to the version string}
\r
770 strVersion := strVersion + '.0';
\r
772 {Returns the Version string with the correct number of segments}
\r
773 Result := strVersion;
\r
777 Function RemoveLeadingZeros(strInput: string): string;
\r
778 {Removes the leading zeros if any from a numeric string}
\r
781 {While the first character of the string is a zero}
\r
782 While Copy(strInput, 1, 1) = '0' Do
\r
785 {Removes one leading zero from the input string}
\r
786 strInput := Copy(strInput, 2, Length(strINput));
\r
789 {Returns the formatted string}
\r
790 Result := strInput;
\r
795 {Returns whether or not the version string detected is meets the version number requirement}
\r
796 Function VersionAtLeast(strVersion_Installed: string; intMajor: integer; intMinor: integer; intRevision: integer; intBuild: integer): boolean;
\r
799 {Stores the Major of the Version installed (X.0.0.0)}
\r
800 intMajor_Installed: Integer;
\r
802 {Stores the Minor of the Version installed (1.X.0.0)}
\r
803 intMinor_Installed: Integer;
\r
805 {Stores the Revision of the Version installed (1.0.X.0)}
\r
806 intRevision_Installed: Integer;
\r
808 {Stores the Revision of the Version installed (1.0.0.X)}
\r
809 intBuild_Installed: Integer;
\r
811 {Stores the last valid character of a particular segment (Major, Minor, Revision) of the Version string}
\r
812 intEnd_Pos: Integer;
\r
816 Msgbox('The version installed is ' + strVersion_Installed + ' and the required version is ' + IntToStr(intMajor) + '.' + IntToStr(intMinor) + '.' + IntToStr(intRevision) + '.' + IntToStr(intBuild), mbINformation, mb_OK)
\r
819 {Makes sure the version string contains four numberic segments 5.2 ---> 5.2.0.0}
\r
820 strVersion_Installed := FixVersion(strVersion_Installed);
\r
822 {If the version number is empty then quit the function}
\r
823 if strVersion_Installed = '' Then
\r
827 {Stops analyzing the version installed and returns that the version installed was inadequate}
\r
831 {Starts detecting the Major value of the Version Installed}
\r
833 {Sets the end position equal to one character before the first period in the version number}
\r
834 intEnd_Pos := Pos('.', strVersion_Installed) -1
\r
836 {Sets the major version equal to all character before the first period }
\r
837 intMajor_installed := StrToIntDef(RemoveLeadingZeros(Copy(strVersion_Installed, 1, intEnd_Pos)), 0);
\r
840 msgbox('The Major version installed is ' + IntToStr(intMajor_installed) + ' and the required Major is ' + IntToStr(intMajor) + '.', mbInformation, MB_OK)
\r
843 {If the Major Version Installed is greater than the required value then...}
\r
844 if intMajor_Installed > intMajor Then
\r
846 {Returns that the version number was adequate, since it actually exceeded the requirement}
\r
850 msgbox(IntToStr(intMajor_installed) + ' > ' + IntToStr(intMajor), mbInformation, MB_OK)
\r
853 {Stops analyzing the version number since we already know it met the requirement}
\r
857 {If the Major version installed is less than the requirement then...}
\r
858 If intMajor_Installed < intMajor Then
\r
861 msgbox(IntToStr(intMajor_installed) + ' < ' + IntToStr(intMajor), mbInformation, MB_OK)
\r
866 {Stops analyzing the version number since we already know it's inadequate and returns False (inadequate)}
\r
871 {Starts detecting the Minor version of the Version Installed}
\r
873 {Modifies strVersion_Installed removing the first period and everything prior to it (Removes the Major Version)}
\r
874 strVersion_Installed := Copy(strVersion_Installed, intEnd_Pos + 2, Length(strVersion_Installed));
\r
876 {Sets the end position equal to one character before the first period in the version number}
\r
877 intEnd_Pos := Pos('.', strVersion_Installed) -1
\r
879 {Sets the Minor version equal to all character before the first period }
\r
880 intMinor_installed := StrToIntDef(RemoveLeadingZeros(Copy(strVersion_Installed, 1, intEnd_Pos)), 0)
\r
883 msgbox('The Minor version installed is ' + IntToStr(intMinor_installed) + ' and the required Minor is ' + IntToStr(intMinor) + '.', mbInformation, MB_OK)
\r
886 {If the Minor Version Installed is greater than the required value then...}
\r
887 If intMinor_Installed > intMinor Then
\r
889 {Returns that the version number was adequate}
\r
892 {Stops further analyzation of the version number}
\r
896 {If the minor installed is less than what was required}
\r
897 If intMinor_Installed < intMinor Then
\r
901 {Returns that the version installed did not meet the required value and stops analyzing the version number}
\r
906 {Starts Detecting the Revision of the Version Installed}
\r
908 {Modifies strVersion_Installed removing the first period and everything prior to it (Removes the Minor Version)}
\r
909 strVersion_Installed := Copy(strVersion_Installed, intEnd_Pos + 2, Length(strVersion_Installed));
\r
911 {Sets the last character of the Revision to last character before the first period}
\r
912 intEnd_Pos := Pos('.', strVersion_Installed) -1
\r
914 {Sets the Revision Installed equal to everything before the first period}
\r
915 intRevision_Installed := strToIntDef(RemoveLeadingZeros(Copy(strVersion_Installed, 1, intEnd_Pos)), 0);
\r
918 msgbox('The Revision version installed is ' + IntToStr(intRevision_installed) + ' and the required Revision is ' + IntToStr(intRevision) + '.', mbInformation, MB_OK)
\r
921 {If the Revision Installed is greater than the required value then...}
\r
922 If intRevision_Installed > intRevision Then
\r
924 {Return that the version installed was adequate}
\r
927 {Stops further analyzation of the version number}
\r
931 {If the revision installed did not meet the requirement then...}
\r
932 If intRevision_Installed < intRevision Then
\r
936 {Return that the version number failed to meet the requirement and stops further analyzation of the version number}
\r
940 {Start Detection the Build Installed}
\r
942 {Modifies strVersion_Installed removing the first period and everything prior to it (Removes the Revision) leaving behind only the build number}
\r
943 strVersion_Installed := Copy(strVersion_Installed, intEnd_Pos + 2, Length(strVersion_Installed));
\r
945 {Set the build installed = to what's left of the strVersion_Installed text}
\r
946 intBuild_installed := strToIntDef(RemoveLeadingZeros(strVersion_Installed), 0);
\r
949 msgbox('The Build version installed is ' + IntToStr(intBuild_installed) + ' and the required Build is ' + IntToStr(intBuild) + '.', mbInformation, MB_OK)
\r
952 {If the build installed is greater than or equal to the requirement then...}
\r
953 if intBuild_installed >= intBuild Then
\r
955 {Report that the version installed was adequate}
\r
959 {Reports the inadequacy of the version installed and seases processing }
\r
964 {Determines whether or not TortoiseCVS is installed}
\r
965 Function TortoiseCVSInstalled(): boolean;
\r
967 {This absolutely must remain as \CustomIcons, because our application used to create some TortoiseCVS keys even if the application wasn't installed!}
\r
968 Result := RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE\TortoiseCVS\CustomIcons') or RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE\TortoiseCVS\Icons');
\r
971 {Determines whether or not TortoiseGit is installed}
\r
972 Function TortoiseGitInstalled(): boolean;
\r
974 Result := RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE\TortoiseGit') or RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE\Classes\Directory\Background\shellex\ContextMenuHandlers\TortoiseGit');
\r
977 {Determines whether or not TortoiseSVN is installed}
\r
978 Function TortoiseSVNInstalled(): boolean;
\r
980 Result := RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE\TortoiseSVN') or RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE\Classes\Directory\Background\shellex\ContextMenuHandlers\TortoiseSVN');
\r
983 Function OldGroup(): string;
\r
985 {Stores where in \All Users\Programs\ our start menu used to be located}
\r
986 RegQueryStringValue(HKEY_LOCAL_MACHINE, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\WinMerge_is1', 'Inno Setup: Icon Group', Result)
\r
989 Procedure DeletePreviousStartMenu();
\r
993 strMessage: string;
\r
994 strShortcut: string;
\r
996 {Detects the previous start menu group's path, if any}
\r
997 strOld := OldGroup();
\r
999 {Detects the current start menu group's path, if any (not creating a group is a valid option)}
\r
1000 strNew := ExpandConstant('{group}');
\r
1002 {removes the start menu portion of the path from the group path making it match the format of strOld}
\r
1003 StringChange(strNew, ExpandConstant('{commonprograms}\'), '')
\r
1005 {if the user does have a previous start menu location then..}
\r
1006 If strOld <> '' Then
\r
1008 {If the current and previous start menu locations are different then...}
\r
1009 If Uppercase(strOld) <> UpperCase(strNew) Then
\r
1011 strMessage := ExpandConstant('{cm:DeletePreviousStartMenu}');
\r
1012 strMessage := Format(strMessage, [strOld, strNew]);
\r
1014 {Display a dialog asking the user if they'd like to delete the previous start menu group}
\r
1015 {If they'd like to delete the previous start menu group then...}
\r
1016 If Msgbox(strMessage, mbConfirmation, mb_YesNo) = mrYes Then
\r
1018 strOld := ExpandConstant('{commonprograms}\') + strOld;
\r
1019 {Remove old start menu}
\r
1020 DelTree(strOld, True, True, True);
\r
1026 {This event procedure is queed each time the user changes pages within the installer}
\r
1027 Procedure CurPageChanged(CurPage: integer);
\r
1029 {if the installer reaches the file copy page then...}
\r
1030 If CurPage = wpInstalling Then
\r
1031 {Delete the previous start menu group if the location has changed since the last install}
\r
1032 DeletePreviousStartMenu;
\r
1035 // Checks if context menu is already enabled for shell extension
\r
1036 // If so, we won't overwrite its existing value in [Registry] section
\r
1037 Function ShellMenuEnabled(Unused: string): string;
\r
1039 ContextMenuEnabled: DWORD;
\r
1041 ContextMenuEnabled := 0;
\r
1042 RegQueryDWORDValue(HKCU, 'Software\Thingamahoochie\WinMerge', 'ContextMenuEnabled', ContextMenuEnabled);
\r
1043 if IsTaskSelected('ShellExtension') then
\r
1044 Result := inttostr(ContextMenuEnabled or 1)
\r
1049 {Replace one occurrence of OldStr in Str with NewStr}
\r
1050 Function ReplaceSubString(Src: string; OldStr: string; NewStr: string) : string;
\r
1052 OldStrStartAt: Integer;
\r
1055 OldStrStartAt := Pos(OldStr, Src);
\r
1056 if OldStrStartAt > 0 then
\r
1058 {Remove old string}
\r
1059 Delete(Src, OldStrStartAt, Length(OldStr));
\r
1060 {Insert new string}
\r
1061 Insert(NewStr, Src, OldStrStartAt);
\r
1066 {Returns WinMerge installed exeutable file name}
\r
1067 Function WinMergeExeName(): string;
\r
1072 Result := ExpandConstant('{app}\') + ExeName(Unused);
\r
1075 {Returns ClearCase external tools configuration file name}
\r
1076 Function ClearCaseMapFile(): string;
\r
1078 if not RegQueryStringValue(HKEY_LOCAL_MACHINE, 'SOFTWARE\Rational Software\', 'RSINSTALLDIR', Result) then
\r
1080 Result := {pf} + '\Rational\';
\r
1082 Result := Result + 'ClearCase\lib\mgrs\map';
\r
1085 {Determines whether or not Rational ClearCase is installed}
\r
1086 Function ClearCaseInstalled(): boolean;
\r
1088 Result := FileExists(ClearCaseMapFile());
\r
1091 {Intergrate WinMerge as ClearCase external diff tool}
\r
1092 Procedure IntegrateClearCase(OldExe: String; NewExe: String);
\r
1094 MapFile: TStringList;
\r
1100 FileName := ClearCaseMapFile();
\r
1101 {Create a backup file of the original file first time it gets modified}
\r
1102 BakFile := FileName + '.original';
\r
1103 if not FileExists(BakFile) then
\r
1105 FileCopy(FileName, BakFile, True);
\r
1107 MapFile := TStringList.Create();
\r
1108 {Read the entire map file to a string list}
\r
1109 MapFile.LoadFromFile(FileName);
\r
1110 if MapFile.Count > 0 then
\r
1112 for I := 0 to MapFile.Count do
\r
1114 {Search for the 'text_file_delta xcompare ...' line}
\r
1115 if (MapFile.Strings[I][1] <> ';') and (Pos('text_file_delta', MapFile.Strings[I]) > 0) and (Pos('xcompare', MapFile.Strings[I]) > 0) then
\r
1117 {Replace old executable name with a new executable name}
\r
1118 MapFile.Strings[I] := ReplaceSubString(MapFile.Strings[I], OldExe, NewExe);
\r
1122 { Save the modified file. }
\r
1123 MapFile.SaveToFile(FileName);
\r
1127 // Add WinMerge to system path.
\r
1128 // This requires certain order of things to work:
\r
1129 // #1 ModPathDir function must be first (it gets called by others)
\r
1130 // #2 include of modpath.iss so modpath code gets included
\r
1131 // #3 CurStepChanged and CurUninstallStepChanged procedures as they call
\r
1132 // ModPath (in modpath.iss)
\r
1133 function ModPathDir(): TArrayOfString;
\r
1135 Dir: TArrayOfString;
\r
1137 setArrayLength(Dir, 1)
\r
1138 Dir[0] := ExpandConstant('{app}');
\r
1142 function UseAs3WayMergeTool(): Boolean;
\r
1144 Result := g_CheckListBox.Checked[0];
\r
1147 function TortoiseSVNGITMergeToolCommandLine(Unused: string): string;
\r
1152 if g_CheckListBox.Checked[1] then begin
\r
1154 Args := '/e /ub /fr /wl /wm /dl %bname /dm %tname /dr %yname %base %theirs %mine /o %merged';
\r
1155 end else if g_CheckListBox.Checked[2] then begin
\r
1157 Args := '/e /ub /fm /wl /wr /dl %tname /dm %bname /dr %yname %theirs %base %mine /o %merged';
\r
1160 Args := '/e /ub /fl /wm /wr /dl %yname /dm %tname /dr %bname %mine %theirs %base /o %merged';
\r
1162 if g_CheckListBox.Checked[4] then begin
\r
1163 Args := Args + ' /a' + lmr;
\r
1165 Result := WinMergeExeName() + ' ' + Args;
\r
1168 function ThreeWayMergePage_ShouldSkipPage(Page: TWizardPage): Boolean;
\r
1170 Result := not (IsTaskSelected('TortoiseSVN') or IsTaskSelected('TortoiseGIT'));
\r
1173 #include "modpath.iss"
\r
1175 procedure CurStepChanged(CurStep: TSetupStep);
\r
1177 if CurStep = ssPostInstall then
\r
1179 if IsTaskSelected('modifypath') then
\r
1181 if IsTaskSelected('ClearCase') then
\r
1183 IntegrateClearCase('..\..\bin\cleardiffmrg.exe', WinMergeExeName());
\r
1188 Procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
\r
1191 selectedTasks: AnsiString;
\r
1193 appdir := ExpandConstant('{app}')
\r
1194 if CurUninstallStep = usUninstall then begin
\r
1195 if LoadStringFromFile(appdir + '\uninsTasks.txt', selectedTasks) then
\r
1196 if Pos('modifypath', selectedTasks) > 0 then
\r
1198 DeleteFile(appdir + '\uninsTasks.txt')
\r
1201 if CurUninstallStep = usPostUninstall then
\r
1203 if ClearCaseInstalled() then
\r
1204 IntegrateClearCase(WinMergeExeName(), '..\..\bin\cleardiffmrg.exe');
\r
1208 function BooleanToString(Value : Boolean) : String;
\r
1213 Result := 'false';
\r
1216 function StringToBoolean(Value : String) : Boolean;
\r
1218 if Value = 'true' then
\r
1224 procedure RegisterPreviousData(PreviousDataKey: Integer);
\r
1226 SetPreviousData(PreviousDataKey, 'UseAs3WayMergeTool', BooleanToString(g_CheckListBox.Checked[0]));
\r
1227 SetPreviousData(PreviousDataKey, 'MergeAtRightPane', BooleanToString(g_CheckListBox.Checked[1]));
\r
1228 SetPreviousData(PreviousDataKey, 'MergeAtCenterPane', BooleanToString(g_CheckListBox.Checked[2]));
\r
1229 SetPreviousData(PreviousDataKey, 'MergeAtLeftPane', BooleanToString(g_CheckListBox.Checked[3]));
\r
1230 SetPreviousData(PreviousDataKey, 'AutoMergeAtStartup', BooleanToString(g_CheckListBox.Checked[4]));
\r
1233 function GetSysColor(ColorType: Integer): Integer;
\r
1234 external 'GetSysColor@user32.dll';
\r
1236 procedure InitializeWizard();
\r
1238 Page: TWizardPage;
\r
1240 Page := CreateCustomPage(wpSelectTasks, ExpandConstant('{cm:ThreeWayMergeWizardPageCaption}'), ExpandConstant('{cm:ThreeWayMergeWizardPageDescription}'));
\r
1241 Page.OnShouldSkipPage := @ThreeWayMergePage_ShouldSkipPage;
\r
1243 g_CheckListBox := TNewCheckListBox.Create(Page);
\r
1244 g_CheckListBox.Width := Page.SurfaceWidth;
\r
1245 g_CheckListBox.Height := ScaleY(128);
\r
1246 g_CheckListBox.Flat := True;
\r
1247 g_CheckListBox.BorderStyle := bsNone;
\r
1248 g_CheckListBox.Color := GetSysColor(15);
\r
1249 g_CheckListBox.Parent := Page.Surface;
\r
1250 g_CheckListBox.AddCheckBox(ExpandConstant('{cm:RegisterWinMergeAs3WayMergeTool}'), '', 0, StringToBoolean(GetPreviousData('UseAs3WayMergeTool', 'true')), True, False, True, nil);
\r
1251 g_CheckListBox.AddRadioButton(ExpandConstant('{cm:MergeAtRightPane}'), '', 1, StringToBoolean(GetPreviousData('MergeAtRightPane', 'true')), True, nil);
\r
1252 g_CheckListBox.AddRadioButton(ExpandConstant('{cm:MergeAtCenterPane}'), '', 1, StringToBoolean(GetPreviousData('MergeAtCenterPane', 'false')), True, nil);
\r
1253 g_CheckListBox.AddRadioButton(ExpandConstant('{cm:MergeAtLeftPane}'), '', 1, StringToBoolean(GetPreviousData('MergeAtLeftPane', 'false')), True, nil);
\r
1254 g_CheckListBox.AddCheckBox(ExpandConstant('{cm:AutoMergeAtStartup}'), '', 1, StringToBoolean(GetPreviousData('AutoMergeAtStartup', 'true')), True, False, True, nil);
\r