오픈 소스 소프트웨어 개발 및 다운로드

Browse Subversion Repository

Contents of /trunk/installer/teraterm.iss

Parent Directory Parent Directory | Revision Log Revision Log


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

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