Diff of /trunk/installer/teraterm.iss

OSDN > ソフトウェアを探す > Tera Term

 Subversion リポジトリの参照



/[ttssh2]/trunk/installer/teraterm.iss




Diff of /trunk/installer/teraterm.iss



 Parent Directory

|  Revision Log



|  Patch














revision 3947 by maya,
Thu Jul 22 08:36:34 2010 UTC




revision 3948 by maya,
Sun Jul 25 14:55:15 2010 UTC






#

Line 333 
 begin;


Line 333 
 begin;












333
   end;
   end;

















334
 end;
 end;

















335
 
 












336
 
 {







337
 
 // If value is not found in INI, returns ""







338
 
 function GetIniString2(Section:String; Key:String; Filename:String) : String;







339
 
 var







340
 
   Default1: String;







341
 
   Default2: String;







342
 
   Value1:   String;







343
 
   Value2:   String;







344
 
 begin







345
 
   Default1 := 'on';







346
 
   Default2 := 'off';







347
 
   Value1 := GetIniString(Section, Key, Default1, Filename);







348
 
   Value2 := GetIniString(Section, Key, Default2, Filename);







349
 
 







350
 
   if Value1 <> Value2 then







351
 
     // no value in INI







352
 
     Result := ''







353
 
   else







354
 
     // value in INI







355
 
     Result := Value1







356
 
 end;







357
 
 }







358
 
 












359
 function GetDefaultIniFilename : String;
 function GetDefaultIniFilename : String;

















360
 begin
 begin

















361
   Result := ExpandConstant('{app}') + '\TERATERM.INI';
   Result := ExpandConstant('{app}') + '\TERATERM.INI';





























Legend:



Removed from v.3947
 


changed lines


 
Added in v.3948













Back to OSDN">Back to OSDN
ViewVC Help


Powered by ViewVC 1.1.26
 /[ttssh2]/trunk/installer/teraterm.iss
-revision 3947 by maya,
Thu Jul 22 08:36:34 2010 UTC
+revision 3948 by maya,
Sun Jul 25 14:55:15 2010 UTC
 Line 333 
 begin;
    end;
  end;
+ {
+ // If value is not found in INI, returns ""
+ function GetIniString2(Section:String; Key:String; Filename:String) : String;
+ var
+   Default1: String;
+   Default2: String;
+   Value1:   String;
+   Value2:   String;
+ begin
+   Default1 := 'on';
+   Default2 := 'off';
+   Value1 := GetIniString(Section, Key, Default1, Filename);
+   Value2 := GetIniString(Section, Key, Default2, Filename);
+   if Value1 <> Value2 then
+     // no value in INI
+     Result := ''
+   else
+     // value in INI
+     Result := Value1
+ end;
+ }
  function GetDefaultIniFilename : String;
  begin
    Result := ExpandConstant('{app}') + '\TERATERM.INI';
 Legend:



Removed from v.3947
 


changed lines


 
Added in v.3948
 Legend:



Removed from v.3947
 


changed lines


 
Added in v.3948
-Removed from v.3947
+Added in v.3948
-Back to OSDN">Back to OSDN
+ViewVC Help
 Powered by ViewVC 1.1.26

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

Tera Term

Subversion リポジトリの参照