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

Subversion リポジトリの参照

Contents of /trunk/installer/teraterm.iss

Parent Directory Parent Directory | Revision Log Revision Log


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

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