1 |
#define AppName "Tera Term" |
#define AppName "Tera Term" |
2 |
#define AppVer "4.66-RC1" |
#define AppVer "4.72-RC3" |
3 |
;#define snapshot GetDateTimeString('yyyymmdd_hhnnss', '', ''); |
;#define snapshot GetDateTimeString('yyyymmdd_hhnnss', '', ''); |
4 |
|
|
5 |
[Setup] |
[Setup] |
16 |
ShowLanguageDialog=yes |
ShowLanguageDialog=yes |
17 |
AllowNoIcons=true |
AllowNoIcons=true |
18 |
UninstallDisplayIcon={app}\ttermpro.exe |
UninstallDisplayIcon={app}\ttermpro.exe |
|
AppMutex=TeraTermProAppMutex, TeraTermProMacroAppMutex, TeraTermProKeycodeAppMutex, TeraTermMenuAppMutex, CygTermAppMutex |
|
19 |
#ifndef snapshot |
#ifndef snapshot |
20 |
OutputBaseFilename=teraterm-{#AppVer} |
OutputBaseFilename=teraterm-{#AppVer} |
21 |
#else |
#else |
63 |
Source: release\screencapture.ttl; DestDir: {app}; Components: TeraTerm |
Source: release\screencapture.ttl; DestDir: {app}; Components: TeraTerm |
64 |
Source: release\ssh2login.ttl; DestDir: {app}; Components: TeraTerm |
Source: release\ssh2login.ttl; DestDir: {app}; Components: TeraTerm |
65 |
Source: release\wait_regex.ttl; DestDir: {app}; Components: TeraTerm |
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 |
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 |
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 |
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 |
Source: release\ssh_known_hosts; DestDir: {app}; Components: TTSSH; Flags: onlyifdoesntexist uninsneveruninstall; Permissions: authusers-modify |
72 |
Source: ..\cygterm\cygterm.exe; DestDir: {app}; Components: cygterm |
Source: ..\cygterm\cygterm.exe; DestDir: {app}; Components: cygterm |
73 |
Source: ..\cygterm\cygterm.cfg; DestDir: {app}; Components: cygterm; Flags: onlyifdoesntexist uninsneveruninstall; Permissions: authusers-modify |
Source: ..\cygterm\cygterm.cfg; DestDir: {app}; Components: cygterm; Flags: onlyifdoesntexist uninsneveruninstall; Permissions: authusers-modify |
74 |
Source: ..\cygterm\cyglaunch.exe; DestDir: {app}; Components: cygterm |
Source: ..\cygterm\cyglaunch.exe; DestDir: {app}; Components: cygterm |
75 |
Source: ..\cygterm\cygterm+.tar.gz; DestDir: {app}; Components: cygterm |
Source: ..\cygterm\cygterm+.tar.gz; DestDir: {app}; Components: cygterm |
76 |
Source: ..\libs\logmett\Setup_LogMeTT_2_9_7.exe; DestDir: {tmp}; Components: LogMeTT; Flags: deleteafterinstall |
Source: ..\libs\logmett\Setup_LogMeTT_2_9_9_2.exe; DestDir: {tmp}; Components: LogMeTT; Flags: deleteafterinstall |
77 |
Source: ..\libs\logmett\Setup_TTLEdit_1_1_5.exe; DestDir: {tmp}; Components: TTLEdit; Flags: deleteafterinstall |
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 |
Source: ..\ttpmenu\Release\ttpmenu.exe; DestDir: {app}; Components: TeraTerm_Menu; Flags: ignoreversion |
79 |
Source: release\ttmenu_readme-j.txt; DestDir: {app}; Components: TeraTerm_Menu |
Source: release\ttmenu_readme-j.txt; DestDir: {app}; Components: TeraTerm_Menu |
80 |
Source: ..\TTProxy\Release\TTXProxy.dll; DestDir: {app}; Components: TTProxy; Flags: ignoreversion |
Source: ..\TTProxy\Release\TTXProxy.dll; DestDir: {app}; Components: TTProxy; Flags: ignoreversion |
113 |
Name: TeraTerm; Description: Tera Term & Macro; Flags: fixed; Types: custom compact full standard |
Name: TeraTerm; Description: Tera Term & Macro; Flags: fixed; Types: custom compact full standard |
114 |
Name: TTSSH; Description: TTSSH; Types: compact full standard |
Name: TTSSH; Description: TTSSH; Types: compact full standard |
115 |
Name: cygterm; Description: CygTerm+; Types: full standard; Check: not isIA64 |
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 |
Name: LogMeTT; Description: LogMeTT ({cm:comp_installer}); Types: full; MinVersion: 4.1.1998,4.0.1381sp6 |
117 |
Name: TTLEdit; Description: TTLEdit; Types: full standard; MinVersion: 4.1.1998,4.0.1381sp6 |
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 |
Name: TeraTerm_Menu; Description: TeraTerm Menu; Types: full |
119 |
Name: TTProxy; Description: TTProxy; Types: full standard |
Name: TTProxy; Description: TTProxy; Types: full standard |
120 |
Name: Collector; Description: Collector; Types: full |
Name: Collector; Description: Collector; Types: full |
144 |
[Registry] |
[Registry] |
145 |
; Cygterm Here |
; Cygterm Here |
146 |
Root: HKCU; Subkey: Software\Classes\Folder\shell\cygterm; ValueType: string; ValueData: Cy>erm Here; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: cygterm; Tasks: cygtermhere |
Root: HKCU; Subkey: Software\Classes\Folder\shell\cygterm; ValueType: string; ValueData: Cy>erm 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 |
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>erm Here; Flags: uninsdeletekey; Check: not isWin2kOrLater; Components: cygterm; Tasks: cygtermhere |
Root: HKCR; Subkey: Folder\shell\cygterm; ValueType: string; ValueData: Cy>erm 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 |
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>erm 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>erm 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 |
; Associate with .TTL |
157 |
Root: HKCU; Subkey: Software\Classes\.ttl; ValueType: string; ValueData: TeraTerm.MacroFile; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TeraTerm; Tasks: macroassoc |
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 |
Root: HKCU; Subkey: Software\Classes\TeraTerm.MacroFile; ValueType: string; ValueData: Tera Term Macro File; Flags: uninsdeletekey; Check: isWin2kOrLater; Components: TeraTerm; Tasks: macroassoc |
213 |
|
|
214 |
[Run] |
[Run] |
215 |
Filename: {app}\ttermpro.exe; Flags: nowait postinstall skipifsilent unchecked; Description: {cm:launch_teraterm}; Components: TeraTerm |
Filename: {app}\ttermpro.exe; Flags: nowait postinstall skipifsilent unchecked; Description: {cm:launch_teraterm}; Components: TeraTerm |
216 |
Filename: {tmp}\Setup_LogMeTT_2_9_7.exe; Components: LogMeTT |
Filename: {tmp}\Setup_LogMeTT_2_9_9_2.exe; Components: LogMeTT |
217 |
Filename: {tmp}\Setup_TTLEdit_1_1_5.exe; Components: TTLEdit |
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 |
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 |
Filename: {app}\Collector\Collector.exe; Flags: nowait postinstall skipifsilent unchecked; Description: {cm:launch_collector}; Components: Collector |
220 |
|
|
259 |
en.msg_language_none=&English |
en.msg_language_none=&English |
260 |
en.msg_language_japanese=&Japanese |
en.msg_language_japanese=&Japanese |
261 |
en.msg_language_german=&German |
en.msg_language_german=&German |
262 |
|
en.msg_language_french=&French |
263 |
ja.msg_language_caption=言語の選択 |
ja.msg_language_caption=言語の選択 |
264 |
ja.msg_language_description=ユーザーインターフェースの言語を選択してください。 |
ja.msg_language_description=ユーザーインターフェースの言語を選択してください。 |
265 |
ja.msg_language_subcaption=アプリケーションのメニューやダイアログ等の表示言語を選択して、「次へ」をクリックしてください。 |
ja.msg_language_subcaption=アプリケーションのメニューやダイアログ等の表示言語を選択して、「次へ」をクリックしてください。 |
266 |
ja.msg_language_none=英語(&E) |
ja.msg_language_none=英語(&E) |
267 |
ja.msg_language_japanese=日本語(&J) |
ja.msg_language_japanese=日本語(&J) |
268 |
ja.msg_language_german=ドイツ語(&G) |
ja.msg_language_german=ドイツ語(&G) |
269 |
|
ja.msg_language_french=フランス語(&F) |
270 |
en.msg_del_confirm=Are you sure that you want to delete %s ? |
en.msg_del_confirm=Are you sure that you want to delete %s ? |
271 |
ja.msg_del_confirm=%s を削除しますか? |
ja.msg_del_confirm=%s を削除しますか? |
272 |
en.msg_uninstall_confirm=It seems a former version is installed. You are recommended to uninstall it previously. Do you uninstall former version ? |
en.msg_uninstall_confirm=It seems a former version is installed. You are recommended to uninstall it previously. Do you uninstall former version ? |
287 |
ja.comp_TTXAlwaysOnTop=常に最前面に表示できるようにする |
ja.comp_TTXAlwaysOnTop=常に最前面に表示できるようにする |
288 |
en.comp_TTXRecurringCommand=Recurring Command can be used |
en.comp_TTXRecurringCommand=Recurring Command can be used |
289 |
ja.comp_TTXRecurringCommand=定期的に文字列を送信する |
ja.comp_TTXRecurringCommand=定期的に文字列を送信する |
290 |
|
en.comp_installer=Other installer is started |
291 |
|
ja.comp_installer=インストーラが起動します |
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=セットアップは実行中の %s を検出しました。%n%n開いているアプリケーションをすべて閉じてから「次へ」をクリックしてください。 |
294 |
|
|
295 |
[Code] |
[Code] |
296 |
const |
const |
343 |
end; |
end; |
344 |
end; |
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; |
function GetDefaultIniFilename : String; |
438 |
begin |
begin |
439 |
Result := ExpandConstant('{app}') + '\TERATERM.INI'; |
Result := ExpandConstant('{app}') + '\TERATERM.INI'; |
441 |
|
|
442 |
procedure SetIniFile(iniFile: String); |
procedure SetIniFile(iniFile: String); |
443 |
var |
var |
444 |
Language : String; |
Language : String; |
445 |
Locale : String; |
Locale : String; |
446 |
CodePage : integer; |
CodePage : integer; |
447 |
VTFont : String; |
VTFont : String; |
448 |
TEKFont : String; |
TEKFont : String; |
449 |
FileDir : String; |
FileDir : String; |
450 |
TCPPort : integer; |
TCPPort : integer; |
451 |
|
ViewlogEditor : String; |
452 |
|
|
453 |
begin |
begin |
454 |
Language := GetIniString('Tera Term', 'Language', '', iniFile); |
Language := GetIniString('Tera Term', 'Language', '', iniFile); |
455 |
Locale := GetIniString('Tera Term', 'Locale', '', iniFile); |
Locale := GetIniString('Tera Term', 'Locale', '', iniFile); |
456 |
CodePage := GetIniInt('Tera Term', 'CodePage', 0, 0, 0, iniFile); |
CodePage := GetIniInt('Tera Term', 'CodePage', 0, 0, 0, iniFile); |
457 |
VTFont := GetIniString('Tera Term', 'VTFont', '', iniFile); |
VTFont := GetIniString('Tera Term', 'VTFont', '', iniFile); |
458 |
TEKFont := GetIniString('Tera Term', 'TEKFont', '', iniFile); |
TEKFont := GetIniString('Tera Term', 'TEKFont', '', iniFile); |
459 |
FileDir := GetIniString('Tera Term', 'FileDir', '', iniFile); |
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 |
case GetUILanguage and $3FF of |
464 |
$04: // Chinese |
$04: // Chinese |
465 |
begin |
begin |
466 |
if Length(Language) = 0 then |
if Length(Language) = 0 then |
467 |
SetIniString('Tera Term', 'Language', 'Japanese', iniFile); |
SetIniString('Tera Term', 'Language', 'UTF-8', iniFile); |
468 |
if Length(Locale) = 0 then |
if Length(Locale) = 0 then |
469 |
SetIniString('Tera Term', 'Locale', 'chs', iniFile); |
SetIniString('Tera Term', 'Locale', 'chs', iniFile); |
470 |
if CodePage = 0 then |
if CodePage = 0 then |
483 |
if CodePage = 0 then |
if CodePage = 0 then |
484 |
SetIniInt('Tera Term', 'CodePage', 932, iniFile); |
SetIniInt('Tera Term', 'CodePage', 932, iniFile); |
485 |
if Length(VTFont) = 0 then |
if Length(VTFont) = 0 then |
486 |
SetIniString('Tera Term', 'VTFont', 'MS 明朝,0,-16,128', iniFile); |
SetIniString('Tera Term', 'VTFont', 'Terminal,0,-19,128', iniFile); |
487 |
if Length(TEKFont) = 0 then |
if Length(TEKFont) = 0 then |
488 |
SetIniString('Tera Term', 'TEKFont', 'Terminal,0,-8,128', iniFile); |
SetIniString('Tera Term', 'TEKFont', 'Terminal,0,-8,128', iniFile); |
489 |
end; |
end; |
519 |
if GetUILanguage = $409 then begin // en-US |
if GetUILanguage = $409 then begin // en-US |
520 |
|
|
521 |
if Length(Language) = 0 then |
if Length(Language) = 0 then |
522 |
SetIniString('Tera Term', 'Language', 'Japanese', iniFile); |
SetIniString('Tera Term', 'Language', 'UTF-8', iniFile); |
523 |
if Length(Locale) = 0 then |
if Length(Locale) = 0 then |
524 |
SetIniString('Tera Term', 'Locale', 'american', iniFile); |
SetIniString('Tera Term', 'Locale', 'american', iniFile); |
525 |
if CodePage = 0 then |
if CodePage = 0 then |
548 |
SetIniString('Tera Term', 'UILanguageFile', 'lang\Japanese.lng', iniFile); |
SetIniString('Tera Term', 'UILanguageFile', 'lang\Japanese.lng', iniFile); |
549 |
2: |
2: |
550 |
SetIniString('Tera Term', 'UILanguageFile', 'lang\German.lng', iniFile); |
SetIniString('Tera Term', 'UILanguageFile', 'lang\German.lng', iniFile); |
551 |
|
3: |
552 |
|
SetIniString('Tera Term', 'UILanguageFile', 'lang\French.lng', iniFile); |
553 |
else |
else |
554 |
SetIniString('Tera Term', 'UILanguageFile', 'lang\English.lng', iniFile); |
SetIniString('Tera Term', 'UILanguageFile', 'lang\Default.lng', iniFile); |
555 |
end; |
end; |
556 |
|
|
557 |
if Length(FileDir) = 0 then begin |
if Length(FileDir) = 0 then begin |
566 |
SetIniInt('Tera Term', 'TCPPort', 23, iniFile); |
SetIniInt('Tera Term', 'TCPPort', 23, iniFile); |
567 |
end; |
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; |
end; |
575 |
|
|
576 |
procedure InitializeWizard; |
procedure InitializeWizard; |
581 |
UILangFilePageNone : String; |
UILangFilePageNone : String; |
582 |
UILangFilePageJapanese : String; |
UILangFilePageJapanese : String; |
583 |
UILangFilePageGerman : String; |
UILangFilePageGerman : String; |
584 |
|
UILangFilePageFrench : String; |
585 |
begin |
begin |
586 |
UILangFilePageCaption := CustomMessage('msg_language_caption'); |
UILangFilePageCaption := CustomMessage('msg_language_caption'); |
587 |
UILangFilePageDescription := CustomMessage('msg_language_description'); |
UILangFilePageDescription := CustomMessage('msg_language_description'); |
589 |
UILangFilePageNone := CustomMessage('msg_language_none'); |
UILangFilePageNone := CustomMessage('msg_language_none'); |
590 |
UILangFilePageJapanese := CustomMessage('msg_language_japanese'); |
UILangFilePageJapanese := CustomMessage('msg_language_japanese'); |
591 |
UILangFilePageGerman := CustomMessage('msg_language_german'); |
UILangFilePageGerman := CustomMessage('msg_language_german'); |
592 |
|
UILangFilePageFrench := CustomMessage('msg_language_french'); |
593 |
|
|
594 |
UILangFilePage := CreateInputOptionPage(wpSelectComponents, |
UILangFilePage := CreateInputOptionPage(wpSelectComponents, |
595 |
UILangFilePageCaption, UILangFilePageDescription, |
UILangFilePageCaption, UILangFilePageDescription, |
597 |
UILangFilePage.Add(UILangFilePageNone); |
UILangFilePage.Add(UILangFilePageNone); |
598 |
UILangFilePage.Add(UILangFilePageJapanese); |
UILangFilePage.Add(UILangFilePageJapanese); |
599 |
UILangFilePage.Add(UILangFilePageGerman); |
UILangFilePage.Add(UILangFilePageGerman); |
600 |
|
UILangFilePage.Add(UILangFilePageFrench); |
601 |
case ActiveLanguage of |
case ActiveLanguage of |
602 |
'ja': |
'ja': |
603 |
UILangFilePage.SelectedValueIndex := 1; |
UILangFilePage.SelectedValueIndex := 1; |
604 |
|
// 他の言語は最新版に追従していないので、日本語だけ特別扱い |
605 |
else |
else |
606 |
UILangFilePage.SelectedValueIndex := 0; |
UILangFilePage.SelectedValueIndex := 0; |
607 |
end; |
end; |
611 |
var |
var |
612 |
uninstaller : String; |
uninstaller : String; |
613 |
uninstaller2 : String; |
uninstaller2 : String; |
614 |
ResultCode: Integer; |
ResultCode : Integer; |
615 |
iniFile : String; |
iniFile : String; |
616 |
|
ErrMsg : String; |
617 |
begin |
begin |
618 |
|
Result := True; |
619 |
|
|
620 |
case CurPageID of |
case CurPageID of |
621 |
|
|
622 |
wpWelcome: |
wpWelcome: |
650 |
|
|
651 |
end; |
end; |
652 |
|
|
653 |
wpSelectComponents: |
wpSelectDir: |
654 |
begin |
begin |
655 |
|
|
656 |
iniFile := GetIniString('Tera Term', 'UILanguageFile', '', GetDefaultIniFilename()); |
ErrMsg := CheckAppsUsing(); |
657 |
if iniFile = 'lang\Japanese.lng' then |
if Length(ErrMsg) > 0 then |
658 |
UILangFilePage.SelectedValueIndex := 1 |
begin |
659 |
else if iniFile = 'lang\German.lng' then |
MsgBox(Format(CustomMessage('msg_AppRunningError'), [ErrMsg]), mbError, MB_OK); |
660 |
UILangFilePage.SelectedValueIndex := 2 |
Result := False; |
661 |
|
end |
662 |
else |
else |
663 |
UILangFilePage.SelectedValueIndex := 0; |
// -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; |
end; |
685 |
end; |
end; |
|
Result := True; |
|
686 |
end; |
end; |
687 |
|
|
688 |
procedure CurStepChanged(CurStep: TSetupStep); |
procedure CurStepChanged(CurStep: TSetupStep); |
699 |
begin; |
begin; |
700 |
RegDeleteKeyIncludingSubkeys(HKEY_CURRENT_USER, 'Software\Classes\Folder\shell\cygterm'); |
RegDeleteKeyIncludingSubkeys(HKEY_CURRENT_USER, 'Software\Classes\Folder\shell\cygterm'); |
701 |
RegDeleteKeyIncludingSubkeys(HKEY_CLASSES_ROOT, 'Folder\shell\cygterm'); |
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; |
end; |
705 |
|
|
706 |
if not IsTaskSelected('macroassoc') then |
if not IsTaskSelected('macroassoc') then |
719 |
RegDeleteValue(HKEY_CLASSES_ROOT, 'telnet\shell', ''); |
RegDeleteValue(HKEY_CLASSES_ROOT, 'telnet\shell', ''); |
720 |
end; |
end; |
721 |
|
|
722 |
SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, 0, 0); |
SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, 0, 0); |
723 |
|
|
724 |
end; // ssDone |
end; // ssDone |
725 |
end; // case CurStep of |
end; // case CurStep of |
803 |
Name: {app}\copyfont.pif; Type: files |
Name: {app}\copyfont.pif; Type: files |
804 |
Name: {app}\libeay.txt; Type: files |
Name: {app}\libeay.txt; Type: files |
805 |
|
|
806 |
[_ISToolPreCompile] |
[InnoIDE_PreCompile] |
807 |
Name: makechm.bat |
Name: makechm.bat |
808 |
|
;Name: build.bat |
809 |
Name: build.bat; Parameters: rebuild |
Name: build.bat; Parameters: rebuild |
810 |
; Name: build.bat |
|
811 |
|
[InnoIDE_PostCompile] |
812 |
|
Name: makearchive.bat; Parameters: release |