Chinaunix首页 | 论坛 | 博客
  • 博客访问: 1695442
  • 博文数量: 584
  • 博客积分: 13857
  • 博客等级: 上将
  • 技术积分: 11883
  • 用 户 组: 普通用户
  • 注册时间: 2009-12-16 09:34

分类: Windows平台

2013-02-28 21:01:21

如何使用NSIS实现多目录安装设置

转自 RESTOOLS ’s Blog 原作者 : RESTOOLS

 
 有些时候,我们需要让用户设置多个安装目录,如果大家用过 Delphi 就知道了,安装 Delphi 的时候我们可以选择为不同功能的程序(例如共享文件目录,主程序目录,数据库设置程序目录等等)设置不同的安装目录,而这样的功能怎么实现呢,以下为一个很好的例子脚本。
引用:
!include "MUI.nsh"

Name "Test App"
OutFile "test.exe"

!insertmacro MUI_PAGE_COMPONENTS
Page custom SetCustom LeaveCustom
!insertmacro MUI_PAGE_INSTFILES

!insertmacro MUI_LANGUAGE "SimpChinese"

;--------------------------------

Section "SectionA" SecA
  ReadINIStr $0 "$PLUGINSDIR\test.ini" "Field 4" State
  MessageBox MB_OK "SectionA 的安装路径为:$0"
SectionEnd

Section "SectionB" SecB
  ReadINIStr $0 "$PLUGINSDIR\test.ini" "Field 5" State
  MessageBox MB_OK "SectionB 的安装路径为:$0"
SectionEnd

Section "SectionC" SecC
  ReadINIStr $0 "$PLUGINSDIR\test.ini" "Field 6" State
  MessageBox MB_OK "SectionC 的安装路径为:$0"
SectionEnd


Function .Oninit
  InitPluginsDir
  File /oname=$PLUGINSDIR\test.ini ".\test.ini"
FunctionEnd

Function SetCustom
; 判断勾选的组件,并把未勾选组件的安装路径控件设为不可用
  SectionGetFlags ${SecA} $0
  StrCmp $0 0 0 +2
    WriteINIStr "$PLUGINSDIR\test.ini" "Field 4" "Flags" "Disabled"
  StrCmp $0 1 0 +2    ; 如果组件勾选了,还需要去掉 Disabled,这两行代码不能省略
    WriteINIStr "$PLUGINSDIR\test.ini" "Field 4" "Flags" ""

  SectionGetFlags ${SecB} $0
  StrCmp $0 0 0 +2
    WriteINIStr "$PLUGINSDIR\test.ini" "Field 5" "Flags" "Disabled"
  StrCmp $0 1 0 +2
    WriteINIStr "$PLUGINSDIR\test.ini" "Field 5" "Flags" ""

  SectionGetFlags ${SecC} $0
  StrCmp $0 0 0 +2
    WriteINIStr "$PLUGINSDIR\test.ini" "Field 6" "Flags" "Disabled"
  StrCmp $0 1 0 +2
    WriteINIStr "$PLUGINSDIR\test.ini" "Field 6" "Flags" ""

; 预定义组件安装路径
  WriteINIStr "$PLUGINSDIR\test.ini" "Field 4" "State" "$ProgramFiles"
  WriteINIStr "$PLUGINSDIR\test.ini" "Field 5" "State" "$DeskTop"
  WriteINIStr "$PLUGINSDIR\test.ini" "Field 6" "State" "$WinDir"

  InstallOptions::initDialog /NOUNLOAD "$PLUGINSDIR\test.ini"
  !insertmacro MUI_HEADER_TEXT "选择各组件的安装路径" "必须输入有效路径"
  InstallOptions::show
  Pop $R0

FunctionEnd

Function LeaveCustom
; 判断用户输入的路径是否合法。

  ReadINIStr $0 "$PLUGINSDIR\test.ini" "Field 4" "State"
  StrCmp $0 "" +2
  IfFileExists "$0\*" +3
      MessageBox MB_OK|MB_ICONSTOP "组件 A 的安装路径无效!"
      Abort

  ReadINIStr $0 "$PLUGINSDIR\test.ini" "Field 5" "State"
  StrCmp $0 "" +2
  IfFileExists "$0\*" +3
      MessageBox MB_OK|MB_ICONSTOP "组件 B 的安装路径无效!"
      Abort

  ReadINIStr $0 "$PLUGINSDIR\test.ini" "Field 6" "State"
  StrCmp $0 "" +2
  IfFileExists "$0\*" +3
      MessageBox MB_OK|MB_ICONSTOP "组件 C 的安装路径无效!"
      Abort
FunctionEnd


; Ini file generated by the HM NIS Edit IO designer.
[Settings]
NumFields=6

[Field 1]
Type=Label
Text=A 组件安装路径:
Left=8
Right=68
Top=6
Bottom=13

[Field 2]
Type=Label
Text=B 组件安装路径:
Left=5
Right=65
Top=44
Bottom=51

[Field 3]
Type=Label
Text=C 组件安装路径:
Left=8
Right=68
Top=82
Bottom=89

[Field 4]
Type=DirRequest
Left=14
Right=253
Top=19
Bottom=32

[Field 5]
Type=DirRequest
Left=14
Right=254
Top=57
Bottom=70

[Field 6]
Type=DirRequest
Left=14
Right=254
Top=94
Bottom=107

阅读(4391) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~