有Flash的NSIS安装包制作脚本

阅读:499次   时间:2009-12-19 00:00:00   字体:[ ]

; 该脚本应使用NSIS编译器编译

; 安装程序初始定义常量
!define PRODUCT_NAME "医保农合接口"
!define PRODUCT_VERSION "9.3"
!define PRODUCT_PUBLISHER "jljyczy"

SetCompressor lzma

Var hFlash ;定义Flash句柄变量

; ------ MUI 现代界面定义 (1.67 版本以上兼容) ------
!include "MUI.nsh"

; MUI 预定义常量
!define MUI_FINISHPAGE_NOAUTOCLOSE
!define MUI_ABORTWARNING
!define MUI_ICON "${NSISDIR}\Contrib\Graphics\Icons\win-install.ico"
!define MUI_UNICON "${NSISDIR}\Contrib\Graphics\Icons\win-uninstall.ico"
!define MUI_UNWELCOMEFINISHPAGE_BITMAP "${NSISDIR}\Contrib\Graphics\Wizard\orange-uninstall.bmp"
!define MUI_HEADERIMAGE
!define MUI_HEADERIMAGE_BITMAP "${NSISDIR}\Contrib\Graphics\Header\win.bmp"
!define MUI_HEADERIMAGE_UNBITMAP "${NSISDIR}\Contrib\Graphics\Header\orange-uninstall.bmp"

; Flash 运行页面
!define MUI_PAGE_CUSTOMFUNCTION_PRE Pre
!define MUI_PAGE_CUSTOMFUNCTION_SHOW Show
!define MUI_PAGE_CUSTOMFUNCTION_LEAVE Leave
; 欢迎页面
!insertmacro MUI_PAGE_WELCOME
; 组件选择页面
!insertmacro MUI_PAGE_COMPONENTS
; 安装目录选择页面
!insertmacro MUI_PAGE_DIRECTORY
; 安装过程页面
!insertmacro MUI_PAGE_INSTFILES
; Flash 运行页面
!define MUI_PAGE_CUSTOMFUNCTION_Pre Pre
!define MUI_PAGE_CUSTOMFUNCTION_SHOW Show
!define MUI_PAGE_CUSTOMFUNCTION_LEAVE Leave
; 安装完成页面
!insertmacro MUI_PAGE_FINISH

; 安装卸载过程页面
!insertmacro MUI_UNPAGE_INSTFILES

; 安装界面包含的语言设置
!insertmacro MUI_LANGUAGE "SimpChinese"

; 安装预释放文件
!insertmacro MUI_RESERVEFILE_INSTALLOPTIONS
; ------ MUI 现代界面定义结束 ------

Name "${PRODUCT_NAME} ${PRODUCT_VERSION}"
OutFile "医保农合接口.exe"
InstallDir "$PROGRAMFILES\UFSoft"
InstallDirRegKey HKLM "${PRODUCT_UNINST_KEY}" "UninstallString"
ShowInstDetails show
ShowUnInstDetails show
BrandingText "Copyright (C) 2006-2010 jljyczy"

; -------------- Flash 开始运行 --------------

ReserveFile "${NSISDIR}\Plugins\System.dll"
ReserveFile "${NSISDIR}\Plugins\FlashLib.dll"
;ReserveFile "${NSISDIR}\Examples\FlashLib\1.swf"
ReserveFile "1.swf"

Section ""
SectionEnd

Function .onInit
  InitPluginsDir
!define MySWF "$PLUGINSDIR\1.swf"
  ;File "/oname=${MySWF}" "${NSISDIR}\Examples\FlashLib\1.swf"
  File "/oname=${MySWF}" "1.swf"
  File "/oname=$PLUGINSDIR\FlashLib.dll" "${NSISDIR}\Plugins\FlashLib.dll"
FunctionEnd

Function Pre
FunctionEnd

Function Show
  ;System::Call 'user32::LoadImage(i,t,i,i,i,i,) i (0,"$PLUGINSDIR\modern-wizard.bmp",0,0,0,0x2010) .s'
  Pop $R0
  !insertmacro INSTALLOPTIONS_READ $R1 "ioSpecial.ini" "Field 1" "HWND"  ;读取图片容器的句柄
  System::Call '$PLUGINSDIR\FlashLib::FlashLibInit(i,i,i,i,i,i,i) i (0,0,164,291,$R1,$R0,true) .s'
  Pop $hFlash
  System::Call '$PLUGINSDIR\FlashLib::FlashLoadMovie(i,t) i ($hFlash, "${MySWF}")'
FunctionEnd

Function Leave
  System::Call '$PLUGINSDIR\FlashLib::FlashLibFree(i $hFlash)'
FunctionEnd

Function .onGUIEnd
  System::Call '$PLUGINSDIR\FlashLib::FlashLibFree(i $hFlash)'
  System::Free
  ;由于FlashLib插件并不是原生的NSIS插件, 因此最后的释放函数可能并不适用
  ;需要将文件设置为重启删除, 避免临时插件残留
  Delete /REBOOTOK "$PLUGINSDIR\FlashLib.dll"
  RMDIR /REBOOTOK "$PLUGINSDIR"
FunctionEnd

; -------------- Flash 运行结束 --------------

Section -Setup
  ;修改ufhis.ini文件
  WriteINIStr $WINDIR\ufhis.ini YBJK zg_ybmzzh jyxyy1
  WriteINIStr $WINDIR\ufhis.ini YBJK zg_ybmzmm ***
  WriteINIStr $WINDIR\ufhis.ini YBJK zg_ybzyzh jyxyy2
  WriteINIStr $WINDIR\ufhis.ini YBJK zg_ybzymm ***
  WriteINIStr $WINDIR\ufhis.ini YBJK zg_hospitalid 25
  WriteINIStr $WINDIR\ufhis.ini YBJK clientip 192.168.XXX.XXX
  WriteINIStr $WINDIR\ufhis.ini YBJK jm_ybmzzh jyxyy1
  WriteINIStr $WINDIR\ufhis.ini YBJK jm_ybmzmm ***
  WriteINIStr $WINDIR\ufhis.ini YBJK jm_ybzyzh jyxyy2
  WriteINIStr $WINDIR\ufhis.ini YBJK jm_ybzymm ***
  WriteINIStr $WINDIR\ufhis.ini YBJK jm_hospitalid 32
  WriteINIStr $WINDIR\ufhis.ini LICENSE LICENSED dfd9759c0ac5f12e7a57f37dbf56fbf9
  ;删除注册表Internet Mobile键
  DeleteRegKey HKLM "SOFTWARE\Microsoft\Internet Mobile"
  ;在开始菜单程序组下建立一名为"医保农合接口"的目录。
  CreateDirectory "$SMPROGRAMS\医保农合接口"
  SetOverwrite on
SectionEnd

Section "门诊挂号与划价收费" SEC01
  SetOutPath "$INSTDIR\HRP\Economic\OutPatient\"
  File /r "D:\UFSoft_xyy\HRP\Economic\OutPatient\*.*"
  ;在开始菜单目录下建立快捷方式。
  CreateShortCut "$SMPROGRAMS\医保农合接口\门诊挂号.lnk" "$INSTDIR\HRP\Economic\OutPatient\mzgh.exe"
  CreateShortCut "$SMPROGRAMS\医保农合接口\门诊划价收费.lnk" "$INSTDIR\HRP\Economic\OutPatient\mzhf.exe"
  ;在桌面上建立快捷方式。
  CreateShortCut "$DESKTOP\门诊挂号.lnk" "$INSTDIR\HRP\Economic\OutPatient\mzgh.exe"
  CreateShortCut "$DESKTOP\门诊划价收费.lnk" "$INSTDIR\HRP\Economic\OutPatient\mzhf.exe"
SectionEnd

Section "住院登记与出院结算" SEC02
  SetOutPath "$INSTDIR\HRP\Economic\InPatient\"
  File /r "D:\UFSoft_xyy\HRP\Economic\InPatient\*.*"
  ;在开始菜单目录下建立快捷方式。
  CreateShortCut "$SMPROGRAMS\医保农合接口\住院登记与出院结算.lnk" "$INSTDIR\HRP\Economic\InPatient\djcy.exe"
  ;在桌面上建立快捷方式。
  CreateShortCut "$DESKTOP\住院登记与出院结算.lnk" "$INSTDIR\HRP\Economic\InPatient\djcy.exe"
SectionEnd

Section "住院护士站" SEC03
  SetOutPath "$INSTDIR\HRP\Clinic\"
  File /r "D:\UFSoft_xyy\HRP\Clinic\*.*"
  ;在开始菜单目录下建立快捷方式。
  CreateShortCut "$SMPROGRAMS\医保农合接口\住院护士站.lnk" "$INSTDIR\HRP\Clinic\zyhs.exe"
  ;在桌面上建立快捷方式。
  CreateShortCut "$DESKTOP\住院护士站.lnk" "$INSTDIR\HRP\Clinic\zyhs.exe"
SectionEnd

Section "医保BDE驱动" SEC04
  SetOutPath "$INSTDIR\HRP\Driver\"
  File "D:\UFSoft_xyy\HRP\Driver\bde_setup.exe"
  ;立即执行,并等待执行结果。
  ExecWait '"$INSTDIR\HRP\Driver\bde_setup.exe"'
SectionEnd

Section "医保读卡器驱动" SEC05
  SetOutPath "$INSTDIR\HRP\Driver\"
  File "D:\UFSoft_xyy\HRP\Driver\card_reader.exe"
  ;立即执行,并等待执行结果。
  ExecWait '"$INSTDIR\HRP\Driver\card_reader.exe"'
SectionEnd

Section -AdditionalIcons
  CreateShortCut "$SMPROGRAMS\医保农合接口\Uninstall.lnk" "$INSTDIR\uninst.exe"
SectionEnd

Section -Post
  WriteUninstaller "$INSTDIR\uninst.exe"
SectionEnd

#-- 根据 NSIS 脚本编辑规则,所有 Function 区段必须放置在 Section 区段之后编写,以避免安装程序出现未可预知的问题。--#

; 区段组件描述
!insertmacro MUI_FUNCTION_DESCRIPTION_BEGIN
  !insertmacro MUI_DESCRIPTION_TEXT ${SEC01} ""
  !insertmacro MUI_DESCRIPTION_TEXT ${SEC02} ""
  !insertmacro MUI_DESCRIPTION_TEXT ${SEC03} ""
  !insertmacro MUI_DESCRIPTION_TEXT ${SEC04} ""
  !insertmacro MUI_DESCRIPTION_TEXT ${SEC05} ""
!insertmacro MUI_FUNCTION_DESCRIPTION_END


/******************************
 *  以下是安装程序的卸载部分  *
 ******************************/

Section Uninstall
  ;删除卸载文件。
  Delete "$INSTDIR\uninst.exe"
  ;删除桌面快捷方式。
  Delete "$DESKTOP\门诊挂号.lnk"
  Delete "$DESKTOP\门诊划价收费.lnk"
  Delete "$DESKTOP\住院登记与出院结算.lnk"
  Delete "$DESKTOP\住院护士站.lnk"

  ;删除开始菜单目录。
  RMDir /r "$SMPROGRAMS\医保农合接口"
  ;删除安装组件的文件夹。
  RMDir /r "$INSTDIR\HRP\Clinic"
  RMDir /r "$INSTDIR\HRP\Driver"
  RMDir /r "$INSTDIR\HRP\Economic"

  SetAutoClose true
SectionEnd

#-- 根据 NSIS 脚本编辑规则,所有 Function 区段必须放置在 Section 区段之后编写,以避免安装程序出现未可预知的问题。--#

Function un.onInit
  MessageBox MB_ICONQUESTION|MB_YESNO|MB_DEFBUTTON2 "您确实要完全移除 $(^Name) 所有的组件?" IDYES +2
  Abort
FunctionEnd

Function un.onUninstSuccess
  HideWindow
  MessageBox MB_ICONINFORMATION|MB_OK "$(^Name) 已成功地从您的计算机移除。"
FunctionEnd

 源码推荐
关于本站 - 广告服务 - 会员指南 - 联系方法
Copyright ©2003-2011 源码天空 All Rights Reserved