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>erm 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>erm 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>erm 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>erm 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>erm 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>erm 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 |