オープンソース・ソフトウェアの開発とダウンロード

Subversion リポジトリの参照

Contents of /trunk/installer/teraterm.iss

Parent Directory Parent Directory | Revision Log Revision Log


Revision 5380 - (show annotations) (download)
Sun Sep 1 10:45:31 2013 UTC (10 years, 9 months ago) by maya
File size: 45948 byte(s)
bump up the version.
1 #define AppName "Tera Term"
2 #define AppVer "4.79"
3 ;#define snapshot GetDateTimeString('yyyymmdd_hhnnss', '', '');
4
5 [InnoIDE_PreCompile]
6 Name: makechm.bat
7 ;Name: build.bat
8 Name: build.bat; Parameters: rebuild
9
10 [InnoIDE_PostCompile]
11 Name: makearchive.bat; Parameters: release
12
13 [PreCompile]
14 Name: makechm.bat
15 ;Name: build.bat
16 Name: build.bat; Parameters: rebuild
17
18 [PostCompile]
19 Name: makearchive.bat; Parameters: release
20
21 [_ISToolPreCompile]
22 Name: makechm.bat
23 ;Name: build.bat
24 Name: build.bat; Parameters: rebuild
25
26 [_ISToolPostCompile]
27 Name: makearchive.bat; Parameters: release
28
29 [Setup]
30 AppCopyright=TeraTerm Project
31 AppName={#AppName}
32 #ifndef snapshot
33 AppVerName={#AppName} {#AppVer}
34 #else
35 AppVerName={#AppName} {#AppVer}+ snapshot-{#snapshot}
36 #endif
37 LicenseFile=release\license.txt
38 DefaultDirName={pf}\teraterm
39 DefaultGroupName={#AppName}
40 ShowLanguageDialog=yes
41 AllowNoIcons=true
42 UninstallDisplayIcon={app}\ttermpro.exe
43 #ifndef snapshot
44 OutputBaseFilename=teraterm-{#AppVer}
45 #else
46 OutputBaseFilename=teraterm-{#snapshot}
47 #endif
48 PrivilegesRequired=none
49
50 [Languages]
51 Name: en; MessagesFile: compiler:Default.isl
52 Name: ja; MessagesFile: compiler:Languages\Japanese.isl
53
54 [Dirs]
55 Name: {app}\Collector; Components: Collector
56 Name: {app}\theme; Components: TeraTerm
57 Name: {app}\theme\scale; Components: TeraTerm
58 Name: {app}\theme\tile; Components: TeraTerm
59 Name: {app}\plugin; Components: TeraTerm
60 Name: {app}\lang; Components: TeraTerm
61
62 [Files]
63 Source: ..\teraterm\release\ttermpro.exe; DestDir: {app}; Components: TeraTerm; Flags: ignoreversion
64 Source: ..\teraterm\release\ttpcmn.dll; DestDir: {app}; Components: TeraTerm
65 Source: ..\teraterm\release\ttpdlg.dll; DestDir: {app}; Components: TeraTerm
66 Source: ..\teraterm\release\ttpfile.dll; DestDir: {app}; Components: TeraTerm
67 Source: ..\teraterm\release\ttpset.dll; DestDir: {app}; Components: TeraTerm
68 Source: ..\teraterm\release\ttptek.dll; DestDir: {app}; Components: TeraTerm
69 Source: release\TERATERM.INI; DestDir: {app}; Components: TeraTerm; Flags: onlyifdoesntexist uninsneveruninstall; Permissions: authusers-modify
70 Source: release\TSPECIAL1.TTF; DestDir: {fonts}; Components: TeraTerm; Attribs: readonly; Flags: overwritereadonly uninsneveruninstall; FontInstall: Tera Special; Check: isAbleToInstallFont
71 Source: ..\doc\en\teraterm.chm; DestDir: {app}; Components: TeraTerm
72 Source: ..\doc\ja\teratermj.chm; DestDir: {app}; Components: TeraTerm
73 Source: release\license.txt; DestDir: {app}; Components: TeraTerm
74 Source: release\FUNCTION.CNF; DestDir: {app}; Components: TeraTerm
75 Source: release\IBMKEYB.CNF; DestDir: {app}; Components: TeraTerm
76 Source: release\EDITOR.CNF; DestDir: {app}; Components: TeraTerm; Flags: onlyifdoesntexist uninsneveruninstall; Permissions: authusers-modify; DestName: KEYBOARD.CNF
77 Source: release\EDITOR.CNF; DestDir: {app}; Components: TeraTerm
78 Source: release\NT98KEYB.CNF; DestDir: {app}; Components: TeraTerm
79 Source: release\PC98KEYB.CNF; DestDir: {app}; Components: TeraTerm
80 Source: ..\teraterm\release\keycode.exe; DestDir: {app}; Components: TeraTerm
81 Source: ..\teraterm\release\ttpmacro.exe; DestDir: {app}; Components: TeraTerm; Flags: ignoreversion
82 Source: release\delpassw.ttl; DestDir: {app}; Components: TeraTerm
83 Source: release\dialup.ttl; DestDir: {app}; Components: TeraTerm
84 Source: release\login.ttl; DestDir: {app}; Components: TeraTerm
85 Source: release\mpause.ttl; DestDir: {app}; Components: TeraTerm
86 Source: release\random.ttl; DestDir: {app}; Components: TeraTerm
87 Source: release\screencapture.ttl; DestDir: {app}; Components: TeraTerm
88 Source: release\ssh2login.ttl; DestDir: {app}; Components: TeraTerm
89 Source: release\wait_regex.ttl; DestDir: {app}; Components: TeraTerm
90 Source: release\lang\Default.lng; DestDir: {app}\lang; Components: TeraTerm; Flags: onlyifdoesntexist uninsneveruninstall; Permissions: authusers-modify
91 Source: release\lang\Japanese.lng; DestDir: {app}\lang; Components: TeraTerm; Attribs: readonly; Flags: uninsremovereadonly overwritereadonly
92 Source: release\lang\German.lng; DestDir: {app}\lang; Components: TeraTerm; Attribs: readonly; Flags: uninsremovereadonly overwritereadonly
93 Source: release\lang\French.lng; DestDir: {app}\lang; Components: TeraTerm; Attribs: readonly; Flags: uninsremovereadonly overwritereadonly
94 Source: release\lang\Russian.lng; DestDir: {app}\lang; Components: TeraTerm; Attribs: readonly; Flags: uninsremovereadonly overwritereadonly
95 Source: release\lang\Korean.lng; DestDir: {app}\lang; Components: TeraTerm; Attribs: readonly; Flags: uninsremovereadonly overwritereadonly
96 Source: ..\ttssh2\ttxssh\Release\ttxssh.dll; DestDir: {app}; Components: TTSSH; Flags: ignoreversion
97 Source: release\ssh_known_hosts; DestDir: {app}; Components: TTSSH; Flags: onlyifdoesntexist uninsneveruninstall; Permissions: authusers-modify
98 Source: ..\cygterm\cygterm.exe; DestDir: {app}; Components: cygterm
99 Source: ..\cygterm\cygterm.cfg; DestDir: {app}; Components: cygterm; Flags: onlyifdoesntexist uninsneveruninstall; Permissions: authusers-modify
100 Source: ..\cygterm\cyglaunch.exe; DestDir: {app}; Components: cygterm
101 Source: ..\cygterm\cygterm+.tar.gz; DestDir: {app}; Components: cygterm
102 Source: ..\libs\logmett\Setup_LogMeTT_2_9_9_2.exe; DestDir: {tmp}; Components: LogMeTT; Flags: deleteafterinstall
103 Source: ..\libs\logmett\Setup_TTLEditor_1_4_45.exe; DestDir: {tmp}; Components: TTLEdit; Flags: deleteafterinstall
104 Source: ..\ttpmenu\Release\ttpmenu.exe; DestDir: {app}; Components: TeraTerm_Menu; Flags: ignoreversion
105 Source: release\ttmenu_readme-j.txt; DestDir: {app}; Components: TeraTerm_Menu
106 Source: ..\TTProxy\Release\TTXProxy.dll; DestDir: {app}; Components: TTProxy; Flags: ignoreversion
107 Source: release\theme\Advanced.sample; DestDir: {app}\theme\; Components: TeraTerm
108 Source: release\theme\ImageFile.INI; DestDir: {app}\theme\; Components: TeraTerm
109 Source: release\theme\Scale.INI; DestDir: {app}\theme\; Components: TeraTerm
110 Source: release\theme\Tile.INI; DestDir: {app}\theme\; Components: TeraTerm
111 Source: release\theme\scale\23.jpg; DestDir: {app}\theme\scale; Components: TeraTerm
112 Source: release\theme\scale\43.jpg; DestDir: {app}\theme\scale; Components: TeraTerm
113 Source: release\theme\tile\03.jpg; DestDir: {app}\theme\tile; Components: TeraTerm
114 Source: release\theme\tile\44.jpg; DestDir: {app}\theme\tile; Components: TeraTerm
115 Source: release\plugin\ttAKJpeg.dll; DestDir: {app}\plugin\; Components: TeraTerm
116 Source: release\plugin\ttAKJpeg.txt; DestDir: {app}\plugin\; Components: TeraTerm
117 Source: release\Collector\Collector.exe; DestDir: {app}\Collector\; Components: Collector
118 Source: release\Collector\collector.ini; DestDir: {app}\Collector\; Components: Collector
119 Source: release\Collector\Collector_org.exe; DestDir: {app}\Collector\; Components: Collector
120 Source: release\Collector\hthook.dll; DestDir: {app}\Collector\; Components: Collector
121 Source: release\Collector\mfc70.dll; DestDir: {app}\Collector\; Components: Collector
122 Source: release\Collector\msvcr70.dll; DestDir: {app}\Collector\; Components: Collector
123 Source: release\Collector\readme.txt; DestDir: {app}\Collector\; Components: Collector
124 Source: ..\TTXKanjiMenu\release\ttxkanjimenu.dll; DestDir: {app}\; Components: Additional_Plugins/TTXKanjiMenu; Flags: ignoreversion
125 Source: ..\TTXSamples\release\TTXResizeMenu.dll; DestDir: {app}\; Components: Additional_Plugins/TTXResizeMenu; Flags: ignoreversion
126 Source: ..\TTXSamples\release\TTXttyrec.dll; DestDir: {app}\; Components: Additional_Plugins/TTXttyrec; Flags: ignoreversion
127 Source: ..\TTXSamples\release\TTXttyplay.dll; DestDir: {app}\; Components: Additional_Plugins/TTXttyrec; Flags: ignoreversion
128 Source: ..\TTXSamples\release\TTXKcodeChange.dll; DestDir: {app}\; Components: Additional_Plugins/TTXKcodeChange; Flags: ignoreversion
129 Source: ..\TTXSamples\release\TTXViewMode.dll; DestDir: {app}\; Components: Additional_Plugins/TTXViewMode; Flags: ignoreversion
130 Source: ..\TTXSamples\release\TTXAlwaysOnTop.dll; DestDir: {app}\; Components: Additional_Plugins/TTXAlwaysOnTop; Flags: ignoreversion
131 Source: ..\TTXSamples\release\TTXRecurringCommand.dll; DestDir: {app}\; Components: Additional_Plugins/TTXRecurringCommand; Flags: ignoreversion
132
133 [Types]
134 Name: standard; Description: {cm:type_standard}
135 Name: full; Description: {cm:type_full}
136 Name: compact; Description: {cm:type_compact}
137 Name: custom; Description: {cm:type_custom}; Flags: iscustom
138
139 [Components]
140 Name: TeraTerm; Description: Tera Term & Macro; Flags: fixed; Types: custom compact full standard
141 Name: TTSSH; Description: TTSSH; Types: compact full standard
142 Name: cygterm; Description: CygTerm+; Types: full standard; Check: not isIA64
143 Name: LogMeTT; Description: LogMeTT ({cm:comp_installer}); Types: full; MinVersion: 4.1.1998,4.0.1381sp6
144 Name: TTLEdit; Description: TTLEdit ({cm:comp_installer}); Types: full; MinVersion: 4.1.1998,4.0.1381sp6
145 Name: TeraTerm_Menu; Description: TeraTerm Menu; Types: full
146 Name: TTProxy; Description: TTProxy; Types: full standard
147 Name: Collector; Description: Collector; Types: full
148 Name: Additional_Plugins; Description: {cm:comp_TTX}
149 Name: Additional_Plugins/TTXResizeMenu; Description: TTXResizeMenu ({cm:comp_TTXResizeMenu}); Types: full standard
150 Name: Additional_Plugins/TTXttyrec; Description: TTXttyrec ({cm:comp_TTXttyrec}); Types: full standard
151 Name: Additional_Plugins/TTXKanjiMenu; Description: TTXKanjiMenu ({cm:comp_TTXKanjiMenu}); Languages: en
152 Name: Additional_Plugins/TTXKanjiMenu; Description: TTXKanjiMenu ({cm:comp_TTXKanjiMenu}); Types: full; Languages: ja
153 Name: Additional_Plugins/TTXKcodeChange; Description: TTXKcodeChange ({cm:comp_TTXKcodeChange}); Languages: en
154 Name: Additional_Plugins/TTXKcodeChange; Description: TTXKcodeChange ({cm:comp_TTXKcodeChange}); Types: full; Languages: ja
155 Name: Additional_Plugins/TTXViewMode; Description: TTXViewMode ({cm:comp_TTXViewMode}); Types: full
156 Name: Additional_Plugins/TTXAlwaysOnTop; Description: TTXAlwaysOnTop ({cm:comp_TTXAlwaysOnTop}); Types: full
157 Name: Additional_Plugins/TTXRecurringCommand; Description: TTXRecurringCommand ({cm:comp_TTXRecurringCommand}); Types: full
158
159 [Icons]
160 Name: {group}\Tera Term; Filename: {app}\ttermpro.exe; WorkingDir: {app}; IconFilename: {app}\ttermpro.exe; IconIndex: 0; Components: TeraTerm; Flags: createonlyiffileexists
161 Name: {group}\{cm:UninstallProgram,{#AppName}}; Filename: {uninstallexe}; Components: TeraTerm; Flags: createonlyiffileexists
162 Name: {group}\cyglaunch; Filename: {app}\cyglaunch.exe; WorkingDir: {app}; IconFilename: {app}\cyglaunch.exe; IconIndex: 0; Components: cygterm; Flags: createonlyiffileexists
163 Name: {group}\TeraTerm Menu; Filename: {app}\ttpmenu.exe; WorkingDir: {app}; IconFilename: {app}\ttpmenu.exe; IconIndex: 0; Components: TeraTerm_Menu; Flags: createonlyiffileexists
164 Name: {group}\Collector; Filename: {app}\Collector\Collector.exe; WorkingDir: {app}\Collector; IconFilename: {app}\Collector\Collector.exe; IconIndex: 0; Components: Collector; Flags: createonlyiffileexists
165 Name: {userdesktop}\Tera Term; Filename: {app}\ttermpro.exe; WorkingDir: {app}; IconFilename: {app}\ttermpro.exe; Components: TeraTerm; Tasks: desktopicon; IconIndex: 0; Flags: createonlyiffileexists
166 Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\Tera Term; Filename: {app}\ttermpro.exe; WorkingDir: {app}; IconFilename: {app}\ttermpro.exe; Components: TeraTerm; Tasks: quicklaunchicon; IconIndex: 0; Flags: createonlyiffileexists
167 Name: {userstartup}\TeraTerm Menu; Filename: {app}\ttpmenu.exe; WorkingDir: {app}; IconFilename: {app}\ttpmenu.exe; Components: TeraTerm_Menu; IconIndex: 0; Tasks: startupttmenuicon; Flags: createonlyiffileexists
168 Name: {userstartup}\Collector; Filename: {app}\collector\collector.exe; WorkingDir: {app}\Collector; IconFilename: {app}\collector\collector.exe; Components: Collector; Tasks: startupcollectoricon; IconIndex: 0; Flags: createonlyiffileexists
169 Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\cyglaunch; Filename: {app}\cyglaunch.exe; WorkingDir: {app}; IconFilename: {app}\cyglaunch.exe; Components: cygterm; Tasks: quickcyglaunch; IconIndex: 0; Flags: createonlyiffileexists
170
171 [Registry]
172 ; Cygterm Here
173 Root: HKCU; Subkey: Software\Classes\Folder\shell\cygterm; ValueType: string; ValueData: Cy&gterm Here; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: cygterm; Tasks: cygtermhere
174 Root: HKCU; Subkey: Software\Classes\Folder\shell\cygterm\command; ValueType: string; ValueData: """{app}\cyglaunch.exe"" -nocd -v CHERE_INVOKING=y -d ""\""%L\"""""; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: cygterm; Tasks: cygtermhere
175 Root: HKCR; Subkey: Folder\shell\cygterm; ValueType: string; ValueData: Cy&gterm Here; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: cygterm; Tasks: cygtermhere
176 Root: HKCR; Subkey: Folder\shell\cygterm\command; ValueType: string; ValueData: """{app}\cyglaunch.exe"" -nocd -v CHERE_INVOKING=y -d ""\""%L\"""""; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: cygterm; Tasks: cygtermhere
177 ; Cygterm Here from folder Background
178 ; MinVersion 5.00.0000 = not Win9x, 6.0.6000 = Vista or later
179 Root: HKCU; Subkey: Software\Classes\Directory\Background\shell\cygterm; ValueType: string; ValueData: Cy&gterm Here; Flags: uninsdeletekey; Components: cygterm; Tasks: cygtermhere; MinVersion: 5.00.0000,6.0.6000
180 Root: HKCU; Subkey: Software\Classes\Directory\Background\shell\cygterm\command; ValueType: string; ValueData: """{app}\cyglaunch.exe"" -nocd -v CHERE_INVOKING=y -d ""\""%V\"""""; Flags: uninsdeletekey; Components: cygterm; Tasks: cygtermhere; MinVersion: 5.00.0000,6.0.6000
181 Root: HKCU; Subkey: Software\Classes\LibraryFolder\Background\shell\cygterm; ValueType: string; ValueData: Cy&gterm Here; Flags: uninsdeletekey; Components: cygterm; Tasks: cygtermhere; MinVersion: 5.00.0000,6.0.6000
182 Root: HKCU; Subkey: Software\Classes\LibraryFolder\Background\shell\cygterm\command; ValueType: string; ValueData: """{app}\cyglaunch.exe"" -nocd -v CHERE_INVOKING=y -d ""\""%V\"""""; Flags: uninsdeletekey; Components: cygterm; Tasks: cygtermhere; MinVersion: 5.00.0000,6.0.6000
183 ; Associate with .TTL
184 Root: HKCU; Subkey: Software\Classes\.ttl; ValueType: string; ValueData: TeraTerm.MacroFile; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TeraTerm; Tasks: macroassoc
185 Root: HKCU; Subkey: Software\Classes\TeraTerm.MacroFile; ValueType: string; ValueData: Tera Term Macro File; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TeraTerm; Tasks: macroassoc
186 Root: HKCU; Subkey: Software\Classes\TeraTerm.MacroFile\DefaultIcon; ValueType: string; ValueData: {app}\ttpmacro.exe,0; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TeraTerm; Tasks: macroassoc
187 Root: HKCU; Subkey: Software\Classes\TeraTerm.MacroFile\shell\open\command; ValueType: string; ValueData: """{app}\ttpmacro.exe"" ""%1"""; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TeraTerm; Tasks: macroassoc
188 Root: HKCR; Subkey: .ttl; ValueType: string; ValueData: TeraTerm.MacroFile; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: TeraTerm; Tasks: macroassoc
189 Root: HKCR; Subkey: TeraTerm.MacroFile; ValueType: string; ValueData: Tera Term Macro File; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: TeraTerm; Tasks: macroassoc
190 Root: HKCR; Subkey: TeraTerm.MacroFile\DefaultIcon; ValueType: string; ValueData: {app}\ttpmacro.exe,0; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: TeraTerm; Tasks: macroassoc
191 Root: HKCR; Subkey: TeraTerm.MacroFile\shell\open\command; ValueType: string; ValueData: """{app}\ttpmacro.exe"" ""%1"""; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: TeraTerm; Tasks: macroassoc
192 ; Associate with telnet://
193 Root: HKCU; Subkey: Software\Classes\telnet\shell; ValueType: string; ValueData: Open with Tera Term; Flags: uninsclearvalue; Check: isWin2kOrLater; Components: TeraTerm; Tasks: telnetassoc
194 Root: HKCU; Subkey: Software\Classes\telnet\shell\Open with Tera Term\command; ValueType: string; ValueData: """{app}\ttermpro.exe"" /T=1 /nossh %1"; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TeraTerm; Tasks: telnetassoc
195 Root: HKCR; Subkey: telnet\shell; ValueType: string; ValueData: Open with Tera Term; Flags: uninsclearvalue; Check: not isWin2kOrLater; Components: TeraTerm; Tasks: telnetassoc
196 Root: HKCR; Subkey: telnet\shell\Open with Tera Term\command; ValueType: string; ValueData: """{app}\ttermpro.exe"" /T=1 /nossh %1"; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: TeraTerm; Tasks: telnetassoc
197 ; Associate with ssh://
198 Root: HKCU; Subkey: Software\Classes\ssh; ValueType: string; ValueData: URL: SSH Protocol; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
199 Root: HKCU; Subkey: Software\Classes\ssh; ValueName: URL Protocol; ValueType: string; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
200 Root: HKCU; Subkey: Software\Classes\ssh; ValueName: EditFlags; ValueType: dword; ValueData: 2; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
201 Root: HKCU; Subkey: Software\Classes\ssh\DefaultIcon; ValueType: string; ValueData: """{app}\ttxssh.dll"",0"; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
202 Root: HKCU; Subkey: Software\Classes\ssh\shell\open\command; ValueType: string; ValueData: """{app}\ttermpro.exe"" %1"; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
203 Root: HKCR; Subkey: ssh; ValueType: string; ValueData: URL: SSH Protocol; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
204 Root: HKCR; Subkey: ssh; ValueName: URL Protocol; ValueType: string; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
205 Root: HKCR; Subkey: ssh; ValueName: EditFlags; ValueType: dword; ValueData: 2; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
206 Root: HKCR; Subkey: ssh\DefaultIcon; ValueType: string; ValueData: """{app}\ttxssh.dll"",0"; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
207 Root: HKCR; Subkey: ssh\shell\open\command; ValueType: string; ValueData: """{app}\ttermpro.exe"" %1"; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
208 ; Associate with slogin://
209 Root: HKCU; Subkey: Software\Classes\slogin; ValueType: string; ValueData: URL: slogin Protocol; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
210 Root: HKCU; Subkey: Software\Classes\slogin; ValueName: URL Protocol; ValueType: string; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
211 Root: HKCU; Subkey: Software\Classes\slogin; ValueName: EditFlags; ValueType: dword; ValueData: 2; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
212 Root: HKCU; Subkey: Software\Classes\slogin\DefaultIcon; ValueType: string; ValueData: """{app}\ttxssh.dll"",0"; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
213 Root: HKCU; Subkey: Software\Classes\slogin\shell\open\command; ValueType: string; ValueData: """{app}\ttermpro.exe"" %1"; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
214 Root: HKCR; Subkey: slogin; ValueType: string; ValueData: URL: slogin Protocol; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
215 Root: HKCR; Subkey: slogin; ValueName: URL Protocol; ValueType: string; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
216 Root: HKCR; Subkey: slogin; ValueName: EditFlags; ValueType: dword; ValueData: 2; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
217 Root: HKCR; Subkey: slogin\DefaultIcon; ValueType: string; ValueData: """{app}\ttxssh.dll"",0"; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
218 Root: HKCR; Subkey: slogin\shell\open\command; ValueType: string; ValueData: """{app}\ttermpro.exe"" %1"; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: TTSSH; Tasks: sshassoc
219 ; Associate with .TTY
220 Root: HKCU; Subkey: Software\Classes\.tty; ValueType: string; ValueData: TTYRecordFile; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: Additional_Plugins/TTXttyrec; Tasks: ttyplayassoc
221 Root: HKCU; Subkey: Software\Classes\TTYRecordFile; ValueType: string; ValueData: TTY Record File; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: Additional_Plugins/TTXttyrec; Tasks: ttyplayassoc
222 Root: HKCU; Subkey: Software\Classes\TTYRecordFile\DefaultIcon; ValueType: string; ValueData: {app}\ttermpro.exe,0; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: Additional_Plugins/TTXttyrec; Tasks: ttyplayassoc
223 Root: HKCU; Subkey: Software\Classes\TTYRecordFile\shell\open\command; ValueType: string; ValueData: """{app}\ttermpro.exe"" /R=""%1"" /TTYPLAY"; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: Additional_Plugins/TTXttyrec; Tasks: ttyplayassoc
224 Root: HKCR; Subkey: .tty; ValueType: string; ValueData: TTYRecordFile; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: Additional_Plugins/TTXttyrec; Tasks: ttyplayassoc
225 Root: HKCR; Subkey: TTYRecordFile; ValueType: string; ValueData: TTY Record File; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: Additional_Plugins/TTXttyrec; Tasks: ttyplayassoc
226 Root: HKCR; Subkey: TTYRecordFile\DefaultIcon; ValueType: string; ValueData: {app}\ttermpro.exe,0; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: Additional_Plugins/TTXttyrec; Tasks: ttyplayassoc
227 Root: HKCR; Subkey: TTYRecordFile\shell\open\command; ValueType: string; ValueData: """{app}\ttermpro.exe"" /R=""%1"" /TTYPLAY"; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: Additional_Plugins/TTXttyrec; Tasks: ttyplayassoc
228
229 [Tasks]
230 Name: desktopicon; Description: {cm:task_desktopicon}; Components: TeraTerm
231 Name: quicklaunchicon; Description: {cm:task_quicklaunchicon}; Components: TeraTerm
232 Name: startupttmenuicon; Description: {cm:task_startupttmenuicon}; Components: TeraTerm_Menu
233 Name: startupcollectoricon; Description: {cm:task_startupcollectoricon}; Components: Collector
234 Name: cygtermhere; Description: {cm:task_cygtermhere}; Components: cygterm; Flags: unchecked
235 Name: quickcyglaunch; Description: {cm:task_quickcyglaunch}; Components: cygterm; Flags: unchecked
236 Name: macroassoc; Description: {cm:task_macroassoc}; Components: TeraTerm; Flags: unchecked
237 Name: telnetassoc; Description: {cm:task_telnetassoc}; Components: TeraTerm; Flags: unchecked
238 Name: sshassoc; Description: {cm:task_sshassoc}; Components: TTSSH; Flags: unchecked
239 Name: ttyplayassoc; Description: {cm:task_ttyplayassoc}; Components: Additional_Plugins/TTXttyrec; Flags: unchecked
240
241 [Run]
242 Filename: {app}\ttermpro.exe; Flags: nowait postinstall skipifsilent unchecked; Description: {cm:launch_teraterm}; Components: TeraTerm
243 Filename: {tmp}\Setup_LogMeTT_2_9_9_2.exe; Flags: skipifsilent; Components: LogMeTT
244 Filename: {tmp}\Setup_LogMeTT_2_9_9_2.exe; Parameters: /SILENT; Flags: skipifnotsilent; Components: LogMeTT
245 Filename: {tmp}\Setup_TTLEditor_1_4_45.exe; Flags: skipifsilent; Components: TTLEdit
246 Filename: {tmp}\Setup_TTLEditor_1_4_45.exe; Parameters: /SILENT; Flags: skipifnotsilent; Components: TTLEdit
247 Filename: {app}\ttpmenu.exe; Flags: nowait postinstall skipifsilent unchecked; Description: {cm:launch_ttmenu}; Components: TeraTerm_Menu
248 Filename: {app}\Collector\Collector.exe; Flags: nowait postinstall skipifsilent unchecked; Description: {cm:launch_collector}; Components: Collector
249
250 [CustomMessages]
251 en.task_desktopicon=Create Tera Term shortcut to &Desktop
252 en.task_quicklaunchicon=Create Tera Term shortcut to &Quick Launch
253 en.task_startupttmenuicon=Create TeraTerm &Menu shortcut to Startup
254 en.task_startupcollectoricon=Create &Collector shortcut to Startup
255 en.task_cygtermhere=Add "Cy&gterm Here" to Context menu
256 en.task_quickcyglaunch=Create cyg&launch shortcut to Quick Launch
257 en.task_macroassoc=Associate .&ttl file to ttpmacro.exe
258 en.task_telnetassoc=Associate t&elnet protocol to ttermpro.exe
259 en.task_sshassoc=Associate &ssh protocol to ttermpro.exe
260 en.task_ttyplayassoc=Associate .tty file to tterm&pro.exe
261 ja.task_desktopicon=�f�X�N�g�b�v�� Tera Term ���V���[�g�J�b�g������(&D)
262 ja.task_quicklaunchicon=�N�C�b�N�N���� Tera Term ���V���[�g�J�b�g������(&Q)
263 ja.task_startupttmenuicon=�X�^�[�g�A�b�v�� TeraTerm &Menu ���V���[�g�J�b�g������
264 ja.task_startupcollectoricon=�X�^�[�g�A�b�v�� &Collector ���V���[�g�J�b�g������
265 ja.task_cygtermhere=�R���e�L�X�g���j���[�� "Cy&gterm Here" ����������
266 ja.task_quickcyglaunch=�N�C�b�N�N���� cyg&launch ���V���[�g�J�b�g������
267 ja.task_macroassoc=.&ttl �t�@�C���� ttpmacro.exe �����A�t����
268 ja.task_telnetassoc=t&elnet �v���g�R���� ttermpro.exe �����A�t����
269 ja.task_sshassoc=&ssh �v���g�R���� ttermpro.exe �����A�t����
270 ja.task_ttyplayassoc=.tty �t�@�C���� tterm&pro.exe �����A�t����
271 en.type_standard=Standard installation
272 en.type_full=Full installation
273 en.type_compact=Compact installation
274 en.type_custom=Custom installation
275 ja.type_standard=�W���C���X�g�[��
276 ja.type_full=�t���C���X�g�[��
277 ja.type_compact=�R���p�N�g�C���X�g�[��
278 ja.type_custom=�J�X�^���C���X�g�[��
279 en.launch_teraterm=Launch &Tera Term
280 en.launch_ttmenu=Launch TeraTerm &Menu
281 en.launch_collector=Launch &Collector
282 ja.launch_teraterm=������ &Tera Term �����s����
283 ja.launch_ttmenu=������ TeraTerm &Menu �����s����
284 ja.launch_collector=������ &Collector �����s����
285 en.msg_language_caption=Select Language
286 en.msg_language_description=Which language shoud be used?
287 en.msg_language_subcaption=Select the language of application's menu and dialog, then click Next.
288 en.msg_language_none=&English
289 en.msg_language_japanese=&Japanese
290 en.msg_language_german=&German
291 en.msg_language_french=&French
292 en.msg_language_russian=&Russian
293 en.msg_language_korean=&Korean
294 ja.msg_language_caption=�������I��
295 ja.msg_language_description=���[�U�[�C���^�[�t�F�[�X���������I���������������B
296 ja.msg_language_subcaption=�A�v���P�[�V���������j���[���_�C�A���O�����\���������I�������A�u�����v���N���b�N�������������B
297 ja.msg_language_none=�p��(&E)
298 ja.msg_language_japanese=���{��(&J)
299 ja.msg_language_german=�h�C�c��(&G)
300 ja.msg_language_french=�t�����X��(&F)
301 ja.msg_language_russian=���V�A��(&R)
302 ja.msg_language_korean=������(&K)
303 en.msg_del_confirm=Are you sure that you want to delete %s ?
304 ja.msg_del_confirm=%s ���������������H
305 en.msg_uninstall_confirm=It seems a former version is installed. You are recommended to uninstall it previously. Do you uninstall former version ?
306 ja.msg_uninstall_confirm=���O���o�[�W�������C���X�g�[���������������������B�����A���C���X�g�[�������������������������B�A���C���X�g�[�����������H
307 en.comp_TTX=Additional Plugins
308 ja.comp_TTX=�����v���O�C��
309 en.comp_TTXResizeMenu=VT-Window size can be changed from preset
310 ja.comp_TTXResizeMenu=VT�E�B���h�E���T�C�Y���v���Z�b�g�l�����������X����������������
311 en.comp_TTXttyrec=ttyrec format record data can be recorded or playback
312 ja.comp_TTXttyrec=ttyrec�`�����^���f�[�^���L�^/��������������������
313 en.comp_TTXKanjiMenu=Changes Japanese Kanji Code from VT-Window menu
314 ja.comp_TTXKanjiMenu=���{���������R�[�h��VT�E�B���h�E�����j���[������������������������
315 en.comp_TTXKcodeChange=Change Japanese Kanji code by remote sequence
316 ja.comp_TTXKcodeChange=�����[�g�������V�[�P���X�����{���������R�[�h�����X����
317 en.comp_TTXViewMode=View-only mode can be used
318 ja.comp_TTXViewMode=�\�����p���[�h������������������
319 en.comp_TTXAlwaysOnTop=Always On Top can be used
320 ja.comp_TTXAlwaysOnTop=�������O�����\������������������
321 en.comp_TTXRecurringCommand=Recurring Command can be used
322 ja.comp_TTXRecurringCommand=�����I�������������M����
323 en.comp_installer=Other installer is started
324 ja.comp_installer=�C���X�g�[�����N��������
325 en.msg_AppRunningError=Setup has detected that %s is currently running.%n%nPlease close all instances of it now, then click Next to continue.
326 ja.msg_AppRunningError=�Z�b�g�A�b�v�����s���� %s �����o���������B%n%n�J���������A�v���P�[�V�����������������������u�����v���N���b�N�������������B
327
328 [Code]
329 const
330 SHCNF_IDLIST = $0000;
331 SHCNE_ASSOCCHANGED = $08000000;
332
333 procedure SHChangeNotify(wEventId, uFlags, dwItem1, dwItem2: Integer);
334 external 'SHChangeNotify@shell32.dll stdcall';
335
336 var
337 UILangFilePage: TInputOptionWizardPage;
338
339
340 // It is different from x64
341 function isIA64 : Boolean;
342 begin
343 if ProcessorArchitecture = paIA64 then
344 Result := True
345 else
346 Result := False;
347 end;
348
349 // Windows 2000 or later
350 function isWin2kOrLater : Boolean;
351 var
352 Version: TWindowsVersion;
353 begin;
354 GetWindowsVersionEx(Version);
355 if Version.Major >= 5 then
356 Result := True
357 else
358 Result := False;
359 end;
360
361 // Window 9x or NT 4.0 or (Admins or PowerUsers)
362 function isAbleToInstallFont : Boolean;
363 begin;
364 if not UsingWinNT() then begin
365 Result := True;
366 end else begin
367 if isWin2kOrLater() then begin
368 if IsAdminLoggedOn() or IsPowerUserLoggedOn() then begin
369 Result := True;
370 end else begin
371 Result := False
372 end;
373 end else begin
374 Result := True;
375 end;
376 end;
377 end;
378
379 {
380 // If value is not found in INI, returns ""
381 function GetIniString2(Section:String; Key:String; Filename:String) : String;
382 var
383 Default1: String;
384 Default2: String;
385 Value1: String;
386 Value2: String;
387 begin
388 Default1 := 'on';
389 Default2 := 'off';
390 Value1 := GetIniString(Section, Key, Default1, Filename);
391 Value2 := GetIniString(Section, Key, Default2, Filename);
392
393 if Value1 <> Value2 then
394 // no value in INI
395 Result := ''
396 else
397 // value in INI
398 Result := Value1
399 end;
400 }
401
402 function CheckFileUsing(Filename:String) : integer;
403 var
404 TmpFileName : String;
405 begin
406 if FileExists(FileName) then
407 begin
408 TmpFileName := FileName + '.' + GetDateTimeString('yyyymmddhhnnss', #0, #0); // Tmp file ends with timestamp
409 if FileCopy(FileName, TmpFileName, True) then
410 if DeleteFile(FileName) then
411 if RenameFile(TmpFileName, FileName) then
412 Result := 0
413 else
414 Result := -1 // permission?
415 else
416 begin
417 Result := 1; // failed to delete
418 DeleteFile(TmpFileName);
419 end
420 else
421 Result := -1 // permission?
422 end
423 else
424 Result := 0;
425 end;
426
427 function CheckAppsUsing() : string;
428 var
429 FileDir : String;
430 FileName : array[0..6] of String;
431 FileDesc : array[0..6] of String;
432 i : integer;
433 begin
434 FileDir := ExpandConstant('{app}');
435 FileName[0] := FileDir + '\ttermpro.exe';
436 FileName[1] := FileDir + '\ttpmacro.exe';
437 FileName[2] := FileDir + '\keycode.exe';
438 FileName[3] := FileDir + '\ttpmenu.exe';
439 FileName[4] := FileDir + '\cygterm.exe';
440 FileName[5] := FileDir + '\Collector.exe';
441 FileName[6] := FileDir + '\Collector_org.exe';
442 FileDesc[0] := 'Tera Term';
443 FileDesc[1] := 'Tera Term Macro';
444 FileDesc[2] := 'Keycode';
445 FileDesc[3] := 'TeraTerm Menu';
446 FileDesc[4] := 'CygTerm+';
447 FileDesc[5] := 'Collector';
448 FileDesc[6] := 'Collector';
449
450 for i := 0 to 6 do
451 begin
452 case CheckFileUsing(FileName[i]) of
453 1:
454 // Failed to delete. In use.
455 begin
456 if Length(Result) > 0 then
457 Result := Result + ', ' + FileDesc[i]
458 else
459 Result := FileDesc[i]
460 end;
461 else
462 // -1: Failed to copy/rename
463 // 0: OK
464 // NOP
465 end;
466 end;
467
468 end;
469
470 function GetDefaultIniFilename : String;
471 begin
472 Result := ExpandConstant('{app}') + '\TERATERM.INI';
473 end;
474
475 procedure SetIniFile(iniFile: String);
476 var
477 Language : String;
478 Locale : String;
479 CodePage : integer;
480 VTFont : String;
481 TEKFont : String;
482 FileDir : String;
483 TCPPort : integer;
484 ViewlogEditor : String;
485
486 begin
487 Language := GetIniString('Tera Term', 'Language', '', iniFile);
488 Locale := GetIniString('Tera Term', 'Locale', '', iniFile);
489 CodePage := GetIniInt('Tera Term', 'CodePage', 0, 0, 0, iniFile);
490 VTFont := GetIniString('Tera Term', 'VTFont', '', iniFile);
491 TEKFont := GetIniString('Tera Term', 'TEKFont', '', iniFile);
492 FileDir := GetIniString('Tera Term', 'FileDir', '', iniFile);
493 TCPPort := GetIniInt('Tera Term', 'TCPPort', 0, 0, 65535, iniFile)
494 ViewlogEditor := GetIniString('Tera Term', 'ViewlogEditor', '', iniFile);
495
496 case GetUILanguage and $3FF of
497 $04: // Chinese
498 begin
499 if Length(Language) = 0 then
500 SetIniString('Tera Term', 'Language', 'UTF-8', iniFile);
501 if Length(Locale) = 0 then
502 SetIniString('Tera Term', 'Locale', 'chs', iniFile);
503 if CodePage = 0 then
504 SetIniInt('Tera Term', 'CodePage', 936, iniFile);
505 if Length(VTFont) = 0 then
506 SetIniString('Tera Term', 'VTFont', 'Terminal,0,-12,255', iniFile);
507 if Length(TEKFont) = 0 then
508 SetIniString('Tera Term', 'TEKFont', 'Terminal,0,-8,255', iniFile);
509 end;
510 $11: // Japanese
511 begin
512 if Length(Language) = 0 then
513 SetIniString('Tera Term', 'Language', 'Japanese', iniFile);
514 if Length(Locale) = 0 then
515 SetIniString('Tera Term', 'Locale', 'japanese', iniFile);
516 if CodePage = 0 then
517 SetIniInt('Tera Term', 'CodePage', 932, iniFile);
518 if Length(VTFont) = 0 then
519 SetIniString('Tera Term', 'VTFont', 'Terminal,0,-19,128', iniFile);
520 if Length(TEKFont) = 0 then
521 SetIniString('Tera Term', 'TEKFont', 'Terminal,0,-8,128', iniFile);
522 end;
523 $12: // Korean
524 begin
525 if Length(Language) = 0 then
526 SetIniString('Tera Term', 'Language', 'Korean', iniFile);
527 if Length(Locale) = 0 then
528 SetIniString('Tera Term', 'Locale', 'korean', iniFile);
529 if CodePage = 0 then
530 SetIniInt('Tera Term', 'CodePage', 949, iniFile);
531 if Length(VTFont) = 0 then
532 SetIniString('Tera Term', 'VTFont', 'Terminal,0,-12,255', iniFile);
533 if Length(TEKFont) = 0 then
534 SetIniString('Tera Term', 'TEKFont', 'Terminal,0,-8,255', iniFile);
535 end;
536 $19: // Russian
537 begin
538 if Length(Language) = 0 then
539 SetIniString('Tera Term', 'Language', 'Russian', iniFile);
540 if Length(Locale) = 0 then
541 SetIniString('Tera Term', 'Locale', 'russian', iniFile);
542 if CodePage = 0 then
543 SetIniInt('Tera Term', 'CodePage', 1251, iniFile);
544 if Length(VTFont) = 0 then
545 SetIniString('Tera Term', 'VTFont', 'Terminal,0,-12,255', iniFile);
546 if Length(TEKFont) = 0 then
547 SetIniString('Tera Term', 'TEKFont', 'Terminal,0,-8,255', iniFile);
548 end;
549 else // Other
550 begin
551
552 if GetUILanguage = $409 then begin // en-US
553
554 if Length(Language) = 0 then
555 SetIniString('Tera Term', 'Language', 'UTF-8', iniFile);
556 if Length(Locale) = 0 then
557 SetIniString('Tera Term', 'Locale', 'american', iniFile);
558 if CodePage = 0 then
559 SetIniInt('Tera Term', 'CodePage', 65001, iniFile);
560
561 end else begin // Other
562
563 if Length(Language) = 0 then
564 SetIniString('Tera Term', 'Language', 'English', iniFile);
565 if Length(Locale) = 0 then
566 SetIniString('Tera Term', 'Locale', 'english', iniFile);
567 if CodePage = 0 then
568 SetIniInt('Tera Term', 'CodePage', 1252, iniFile);
569
570 end;
571
572 if Length(VTFont) = 0 then
573 SetIniString('Tera Term', 'VTFont', 'Terminal,0,-12,255', iniFile);
574 if Length(TEKFont) = 0 then
575 SetIniString('Tera Term', 'TEKFont', 'Terminal,0,-8,255', iniFile);
576 end;
577 end;
578
579 case UILangFilePage.SelectedValueIndex of
580 1:
581 SetIniString('Tera Term', 'UILanguageFile', 'lang\Japanese.lng', iniFile);
582 2:
583 SetIniString('Tera Term', 'UILanguageFile', 'lang\German.lng', iniFile);
584 3:
585 SetIniString('Tera Term', 'UILanguageFile', 'lang\French.lng', iniFile);
586 4:
587 SetIniString('Tera Term', 'UILanguageFile', 'lang\Russian.lng', iniFile);
588 5:
589 SetIniString('Tera Term', 'UILanguageFile', 'lang\Korean.lng', iniFile);
590 else
591 SetIniString('Tera Term', 'UILanguageFile', 'lang\Default.lng', iniFile);
592 end;
593
594 if Length(FileDir) = 0 then begin
595 FileDir := ExpandConstant('{app}');
596 SetIniString('Tera Term', 'FileDir', FileDir, iniFile);
597 end;
598
599 if TCPPort = 0 then begin
600 if IsComponentSelected('TTSSH') then
601 SetIniInt('Tera Term', 'TCPPort', 22, iniFile)
602 else
603 SetIniInt('Tera Term', 'TCPPort', 23, iniFile);
604 end;
605
606 if ViewlogEditor = 'notepad.exe' then begin
607 ViewlogEditor := ExpandConstant('{win}') + '\' + 'notepad.exe';
608 SetIniString('Tera Term', 'ViewlogEditor', ViewlogEditor, iniFile);
609 end;
610
611 end;
612
613 procedure InitializeWizard;
614 var
615 UILangFilePageCaption : String;
616 UILangFilePageDescription : String;
617 UILangFilePageSubCaption : String;
618 UILangFilePageNone : String;
619 UILangFilePageJapanese : String;
620 UILangFilePageGerman : String;
621 UILangFilePageFrench : String;
622 UILangFilePageRussian : String;
623 UILangFilePageKorean : String;
624 begin
625 UILangFilePageCaption := CustomMessage('msg_language_caption');
626 UILangFilePageDescription := CustomMessage('msg_language_description');
627 UILangFilePageSubCaption := CustomMessage('msg_language_subcaption');
628 UILangFilePageNone := CustomMessage('msg_language_none');
629 UILangFilePageJapanese := CustomMessage('msg_language_japanese');
630 UILangFilePageGerman := CustomMessage('msg_language_german');
631 UILangFilePageFrench := CustomMessage('msg_language_french');
632 UILangFilePageRussian := CustomMessage('msg_language_russian');
633 UILangFilePageKorean := CustomMessage('msg_language_korean');
634
635 UILangFilePage := CreateInputOptionPage(wpSelectComponents,
636 UILangFilePageCaption, UILangFilePageDescription,
637 UILangFilePageSubCaption, True, False);
638 UILangFilePage.Add(UILangFilePageNone);
639 UILangFilePage.Add(UILangFilePageJapanese);
640 UILangFilePage.Add(UILangFilePageGerman);
641 UILangFilePage.Add(UILangFilePageFrench);
642 UILangFilePage.Add(UILangFilePageRussian);
643 UILangFilePage.Add(UILangFilePageKorean);
644 case ActiveLanguage of
645 'ja':
646 UILangFilePage.SelectedValueIndex := 1;
647 // �������������V�������]���������������A���{��������������
648 else
649 UILangFilePage.SelectedValueIndex := 0;
650 end;
651 end;
652
653 function NextButtonClick(CurPageID: Integer): Boolean;
654 var
655 uninstaller : String;
656 uninstaller2 : String;
657 ResultCode : Integer;
658 iniFile : String;
659 ErrMsg : String;
660 begin
661 Result := True;
662
663 case CurPageID of
664
665 wpWelcome:
666 begin
667
668 if RegQueryStringValue(HKEY_LOCAL_MACHINE,
669 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\UTF-8 TeraTerm Pro with TTSSH2_is1',
670 'UninstallString', uninstaller) then
671 begin
672 // UTF-8 TeraTerm Pro with TTSSH2 ���A���C���X�g�[������������������
673 if not RegKeyExists(HKEY_LOCAL_MACHINE,
674 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Tera Term_is1') then
675 begin
676 // Tera Term ���C���X�g�[���G���g����������������(��������������)
677 if MsgBox(CustomMessage('msg_uninstall_confirm'), mbInformation, MB_YESNO) = IDYES then
678 begin
679 // ���[�U���A���C���X�g�[�����I������
680
681 // ���[�� " ������
682 uninstaller2 := Copy(uninstaller, 2, Length(uninstaller) - 2);
683
684 if not Exec(uninstaller2, '', '', SW_SHOW,
685 ewWaitUntilTerminated, ResultCode) then
686 begin
687 // ���s�����s
688 MsgBox(SysErrorMessage(ResultCode), mbError, MB_OK);
689 end;
690 end;
691 end;
692 end;
693
694 end;
695
696 wpSelectDir:
697 begin
698
699 ErrMsg := CheckAppsUsing();
700 if Length(ErrMsg) > 0 then
701 begin
702 MsgBox(Format(CustomMessage('msg_AppRunningError'), [ErrMsg]), mbError, MB_OK);
703 Result := False;
704 end
705 else
706 // -1: goto next. Turn over to Inno Setup.
707 // 0: goto next. No problem.
708 // NOP
709 end;
710
711 wpSelectComponents:
712 begin
713
714 if FileExists(GetDefaultIniFileName()) then
715 begin
716 iniFile := Lowercase(GetIniString('Tera Term', 'UILanguageFile', '', GetDefaultIniFilename()));
717 if iniFile = 'lang\japanese.lng' then
718 UILangFilePage.SelectedValueIndex := 1
719 else if iniFile = 'lang\german.lng' then
720 UILangFilePage.SelectedValueIndex := 2
721 else if iniFile = 'lang\french.lng' then
722 UILangFilePage.SelectedValueIndex := 3
723 else if iniFile = 'lang\russian.lng' then
724 UILangFilePage.SelectedValueIndex := 4
725 else if iniFile = 'lang\korean.lng' then
726 UILangFilePage.SelectedValueIndex := 5
727 else
728 UILangFilePage.SelectedValueIndex := 0;
729 end;
730
731 end;
732 end;
733 end;
734
735 procedure CurStepChanged(CurStep: TSetupStep);
736 var
737 iniFile : String;
738 begin
739 case CurStep of
740 ssDone:
741 begin
742 iniFile := GetDefaultIniFilename();
743 SetIniFile(iniFile);
744
745 if not IsTaskSelected('cygtermhere') then
746 begin;
747 RegDeleteKeyIncludingSubkeys(HKEY_CURRENT_USER, 'Software\Classes\Folder\shell\cygterm');
748 RegDeleteKeyIncludingSubkeys(HKEY_CLASSES_ROOT, 'Folder\shell\cygterm');
749 RegDeleteKeyIncludingSubkeys(HKEY_CURRENT_USER, 'Software\Classes\Directory\Background\shell\cygterm');
750 RegDeleteKeyIncludingSubkeys(HKEY_CURRENT_USER, 'Software\Classes\LibraryFolder\Background\shell\cygterm');
751 end;
752
753 if not IsTaskSelected('macroassoc') then
754 begin;
755 RegDeleteKeyIncludingSubkeys(HKEY_CURRENT_USER, 'Software\Classes\.ttl');
756 RegDeleteKeyIncludingSubkeys(HKEY_CURRENT_USER, 'Software\Classes\TeraTerm.MacroFile');
757 RegDeleteKeyIncludingSubkeys(HKEY_CLASSES_ROOT, '.ttl');
758 RegDeleteKeyIncludingSubkeys(HKEY_CLASSES_ROOT, 'TeraTerm.MacroFile');
759 end;
760
761 if not IsTaskSelected('telnetassoc') then
762 begin;
763 RegDeleteKeyIncludingSubkeys(HKEY_CURRENT_USER, 'Software\Classes\telnet\shell\Open with Tera Term');
764 RegDeleteValue(HKEY_CURRENT_USER, 'Software\Classes\telnet\shell', '');
765 RegDeleteKeyIncludingSubkeys(HKEY_CLASSES_ROOT, 'telnet\shell\Open with Tera Term');
766 RegDeleteValue(HKEY_CLASSES_ROOT, 'telnet\shell', '');
767 end;
768
769 SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, 0, 0);
770
771 end; // ssDone
772 end; // case CurStep of
773 end; // CurStepChanged
774
775 procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
776 var
777 ini : array[0..4] of String;
778 buf : String;
779 conf : String;
780 confmsg : String;
781 app : String;
782 i, res : integer;
783 begin
784 case CurUninstallStep of
785 usPostUninstall:
786 begin
787 ini[0] := '\TERATERM.INI';
788 ini[1] := '\KEYBOARD.CNF';
789 ini[2] := '\ssh_known_hosts';
790 ini[3] := '\cygterm.cfg';
791 ini[4] := '\broadcast.log';
792
793 conf := CustomMessage('msg_del_confirm');
794 app := ExpandConstant('{app}');
795
796 // delete config files
797 for i := 0 to 4 do
798 begin
799 buf := app + ini[i];
800 if FileExists(buf) then begin
801 confmsg := Format(conf, [buf]);
802 res := MsgBox(confmsg, mbInformation, MB_YESNO or MB_DEFBUTTON2);
803 if res = IDYES then
804 DeleteFile(buf);
805 end;
806 end;
807
808 // delete registory
809 if RegKeyExists(HKEY_CURRENT_USER, 'Software\ShinpeiTools\TTermMenu') then begin
810 confmsg := Format(conf, ['HKEY_CURRENT_USER' + '\Software\ShinpeiTools\TTermMenu']);
811 res := MsgBox(confmsg, mbInformation, MB_YESNO or MB_DEFBUTTON2);
812 if res = IDYES then begin
813 RegDeleteKeyIncludingSubkeys(HKEY_CURRENT_USER, 'Software\ShinpeiTools\TTermMenu');
814 RegDeleteKeyIfEmpty(HKEY_CURRENT_USER, 'Software\ShinpeiTools');
815 end;
816 end;
817
818 SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, 0, 0);
819
820 // directory is deleted only if empty
821 RemoveDir(app);
822 end;
823 end;
824 end;
825
826 [InstallDelete]
827 Name: {app}\OpenSSH-LICENCE.txt; Type: files
828 Name: {app}\cygterm-README.txt; Type: files
829 Name: {app}\cygterm-README-j.txt; Type: files
830 Name: {app}\keycode.txt; Type: files
831 Name: {app}\keycodej.txt; Type: files
832 Name: {app}\RE.txt; Type: files
833 Name: {app}\RE-ja.txt; Type: files
834 Name: {app}\ssh2_readme.txt; Type: files
835 Name: {app}\ssh2_readme-j.txt; Type: files
836 Name: {app}\utf8_readme.txt; Type: files
837 Name: {app}\utf8_readme-j.txt; Type: files
838 Name: {app}\OpenSSH-LICENSE.txt; Type: files
839 Name: {app}\OpenSSL-LICENSE.txt; Type: files
840 Name: {group}\TeraTerm Document.lnk; Type: files
841 Name: {group}\TeraTerm Document(Japanese).lnk; Type: files
842 Name: {group}\TTSSH Document.lnk; Type: files
843 Name: {group}\TTSSH Document(Japanese).lnk; Type: files
844 Name: {app}\LogMeTT.hlp; Type: files
845 Name: {app}\macro.hlp; Type: files
846 Name: {app}\macroj.hlp; Type: files
847 Name: {app}\ttermp.hlp; Type: files
848 Name: {app}\ttermpj.hlp; Type: files
849 Name: {app}\copyfont.bat; Type: files
850 Name: {app}\copyfont.pif; Type: files
851 Name: {app}\libeay.txt; Type: files

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26