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

Browse Subversion Repository

Contents of /trunk/installer/teraterm.iss

Parent Directory Parent Directory | Revision Log Revision Log


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

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