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

Subversion リポジトリの参照

Diff of /trunk/installer/teraterm.iss

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 4067 by maya, Tue Aug 31 05:08:41 2010 UTC revision 4150 by maya, Sat Nov 6 20:43:44 2010 UTC
# Line 1  Line 1 
1  #define AppName "Tera Term"  #define AppName "Tera Term"
2  #define AppVer "4.67"  #define AppVer "4.67"
3  ;#define snapshot GetDateTimeString('yyyymmdd_hhnnss', '', '');  #define snapshot GetDateTimeString('yyyymmdd_hhnnss', '', '');
4    
5  [Setup]  [Setup]
6  AppCopyright=TeraTerm Project  AppCopyright=TeraTerm Project
# Line 64  Source: release\random.ttl; DestDir: {ap Line 64  Source: release\random.ttl; DestDir: {ap
64  Source: release\screencapture.ttl; DestDir: {app}; Components: TeraTerm  Source: release\screencapture.ttl; DestDir: {app}; Components: TeraTerm
65  Source: release\ssh2login.ttl; DestDir: {app}; Components: TeraTerm  Source: release\ssh2login.ttl; DestDir: {app}; Components: TeraTerm
66  Source: release\wait_regex.ttl; DestDir: {app}; Components: TeraTerm  Source: release\wait_regex.ttl; DestDir: {app}; Components: TeraTerm
67    Source: release\lang\Default.lng; DestDir: {app}\lang; Components: TeraTerm; Flags: onlyifdoesntexist uninsneveruninstall; Permissions: authusers-modify
68  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
69  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
70  Source: release\lang\French.lng; DestDir: {app}\lang; Components: TeraTerm; Attribs: readonly; Flags: uninsremovereadonly overwritereadonly  Source: release\lang\French.lng; DestDir: {app}\lang; Components: TeraTerm; Attribs: readonly; Flags: uninsremovereadonly overwritereadonly
# Line 363  end; Line 364  end;
364    
365  procedure SetIniFile(iniFile: String);  procedure SetIniFile(iniFile: String);
366  var  var
367    Language : String;    Language      : String;
368    Locale   : String;    Locale        : String;
369    CodePage : integer;    CodePage      : integer;
370    VTFont   : String;    VTFont        : String;
371    TEKFont  : String;    TEKFont       : String;
372    FileDir  : String;    FileDir       : String;
373    TCPPort  : integer;    TCPPort       : integer;
374      ViewlogEditor : String;
375    
376  begin  begin
377    Language := GetIniString('Tera Term', 'Language', '', iniFile);    Language       := GetIniString('Tera Term', 'Language', '', iniFile);
378    Locale   := GetIniString('Tera Term', 'Locale', '', iniFile);    Locale         := GetIniString('Tera Term', 'Locale', '', iniFile);
379    CodePage := GetIniInt('Tera Term', 'CodePage', 0, 0, 0, iniFile);    CodePage       := GetIniInt('Tera Term', 'CodePage', 0, 0, 0, iniFile);
380    VTFont   := GetIniString('Tera Term', 'VTFont', '', iniFile);    VTFont         := GetIniString('Tera Term', 'VTFont', '', iniFile);
381    TEKFont  := GetIniString('Tera Term', 'TEKFont', '', iniFile);    TEKFont        := GetIniString('Tera Term', 'TEKFont', '', iniFile);
382    FileDir  := GetIniString('Tera Term', 'FileDir', '', iniFile);    FileDir        := GetIniString('Tera Term', 'FileDir', '', iniFile);
383      FileDir        := GetIniString('Tera Term', 'FileDir', '', iniFile);
384      ViewlogEditor  := GetIniString('Tera Term', 'ViewlogEditor', '', iniFile);
385    
386    case GetUILanguage and $3FF of    case GetUILanguage and $3FF of
387    $04: // Chinese    $04: // Chinese
# Line 470  begin Line 474  begin
474      3:      3:
475        SetIniString('Tera Term', 'UILanguageFile', 'lang\French.lng', iniFile);        SetIniString('Tera Term', 'UILanguageFile', 'lang\French.lng', iniFile);
476      else      else
477        SetIniString('Tera Term', 'UILanguageFile', 'lang\English.lng', iniFile);        SetIniString('Tera Term', 'UILanguageFile', 'lang\Default.lng', iniFile);
478    end;    end;
479    
480    if Length(FileDir) = 0 then begin    if Length(FileDir) = 0 then begin
# Line 485  begin Line 489  begin
489        SetIniInt('Tera Term', 'TCPPort', 23, iniFile);        SetIniInt('Tera Term', 'TCPPort', 23, iniFile);
490    end;    end;
491    
492      if ViewlogEditor = 'notepad.exe' then begin
493        ViewlogEditor := ExpandConstant('{win}') + '\' + 'notepad.exe';
494        SetIniString('Tera Term', 'ViewlogEditor', ViewlogEditor, iniFile);
495      end;
496    
497  end;  end;
498    
499  procedure InitializeWizard;  procedure InitializeWizard;
# Line 694  Name: {app}\copyfont.bat; Type: files Line 703  Name: {app}\copyfont.bat; Type: files
703  Name: {app}\copyfont.pif; Type: files  Name: {app}\copyfont.pif; Type: files
704  Name: {app}\libeay.txt; Type: files  Name: {app}\libeay.txt; Type: files
705    
706  [_ISToolPreCompile]  [InnoIDE_PreCompile]
707  Name: makechm.bat  Name: makechm.bat
708  Name: build.bat; Parameters: rebuild  ;Name: build.bat; Parameters: rebuild
709  ; Name: build.bat  Name: build.bat

Legend:
Removed from v.4067  
changed lines
  Added in v.4150

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