This commit was manufactured by cvs2svn to create branch 'Bb61'.

[gikonavigoeson/gikonavi.git] / readme / gikoSetup.iss

diff --git a/readme/gikoSetup.iss b/readme/gikoSetup.iss
index c069035..9e1512f 100644 (file)
--- a/readme/gikoSetup.iss
+++ b/readme/gikoSetup.iss
@@ -9,12 +9,13 @@ DefaultDirName={pf}\gikonavi
 VersionInfoDescription=\83M\83R\83i\83r\83Z\83b\83g\83A\83b\83v\83v\83\8d\83O\83\89\83\80
 DefaultGroupName=\83M\83R\83i\83r
 ; \8e©\95ª\82Ì\8aÂ\8b«\82É\8d\87\82í\82¹\82Ä\82­\82¾\82³\82¢
-SourceDir=G:\Release
-OutputDir=G:\Output
+SourceDir=G:\Release61
+OutputDir=G:\InnoSetup\Output
 SetupIconFile="G:\gikoNaviSFX_102\MainIcon.ico"
 ; \83M\83R\83i\83r\82Ì\83o\81[\83W\83\87\83\93\82É\82 \82í\82¹\82Ä\82­\82¾\82³\82¢
-VersionInfoVersion=1.56.0.714
-OutputBaseFilename=gikoNavi_1.56.0.714_2_setup
+VersionInfoVersion=1.61.1.801
+OutputBaseFilename=gikoNavi_b61_setup
+
 
 
 [Tasks]
@@ -38,8 +39,8 @@ Source: "config\BoardPlugin\*.dll" ; Destdir: {app}\config\BoardPlugin ;Flags: i
 
 [Icons]
 Name: "{group}\Readme"; Filename: "{app}\readme.txt"; Tasks: startmenuicon
-Name: "{group}\\83M\83R\83i\83r"; Filename: "{app}\gikoNavi.exe"; Tasks: startmenuicon
-Name: "{commondesktop}\\83M\83R\83i\83r"; Filename: "{app}\gikoNavi.exe"; Tasks: desktopicon
+Name: "{group}\\83M\83R\83i\83r"; Filename: "{app}\gikoNavi.exe"; WorkingDir: "{app}"; Tasks: startmenuicon
+Name: "{commondesktop}\\83M\83R\83i\83r"; Filename: "{app}\gikoNavi.exe"; WorkingDir: "{app}"; Tasks: desktopicon
 
 [Run]
 Filename: "{app}\readme.txt"; Description: "README\82ð\95\\8e¦\82·\82é"; Flags: postinstall shellexec skipifsilent unchecked
@@ -56,6 +57,9 @@ Name: japanese; MessagesFile: compiler:Languages\Japanese.isl
 
 [Code]
 procedure CurStepChanged(CurStep: TSetupStep);
+var
+  path :String;
+  srcpath: String;
 begin
   case CurStep of
     ssInstall:
@@ -75,6 +79,15 @@ begin
               end;
           end;
       end;
+    ssPostInstall:
+      begin
+        path := ExpandConstant('{app}') + '\gikoNavi.ini';
+        srcpath := ExpandConstant('{srcexe}');
+        if (FileExists(path)) then
+        begin
+          SetIniString('Update', 'Remove0', srcpath, path);
+        end;
+      end;
   end;
 
 end;
@@ -90,7 +103,7 @@ begin
         begin
           DelTree(path, True, True, True);
         end;
-        
+
         path := ExpandConstant('{app}') + '\config';
         if MsgBox(path + '\83t\83H\83\8b\83_\88È\89º\82ð\8a®\91S\82É\8fÁ\8b\8e\82µ\82Ä\82æ\82ë\82µ\82¢\82Å\82µ\82å\82¤\82©\81H', mbConfirmation, MB_YESNO) = IDYES then
         begin