当前位置:   article > 正文

NSIS 自定义界面,下载并安装Net.Framework4.8_通过nsis和duilib实现自定义安装界面

通过nsis和duilib实现自定义安装界面

如果我们的软件开发的语言使用的是C#,使用的平台框架是Net.Framework,哪么在部署软件安装时,就需要考虑在安装过程检测是否需要安装net环境,并进行安装。

本文以 ScreenToGif 这款软件为例,详细讲解如何在安装的过程中检测并下载net包进行安装。

 

前言

1、ScreenToGif 是一款开源的截屏软件,依赖于Net.Framework环境

2、本文讲解的NSIS安装过程为自定义界面,而非传统界面(需要传统界面的留言区留言)。

3、Win10系统好像是自动集成了Net.Framework4.8的环境

4、安装Net.Framework4.0以上的版本,需要先安装微软证书,再安装Net.Framework安装,否则可能安装不成功,如下图:

 

相关资源

微软证书2011下载链接:https://download.microsoft.com/download/2/4/8/248D8A62-FCCD-475C-85E7-6ED59520FC0F/MicrosoftRootCertificateAuthority2011.cer

Net.Framework4.8离线包下载链接:https://download.visualstudio.microsoft.com/download/pr/014120d7-d689-4305-befd-3cb711108212/0fd66638cde16859462a6243a4629a50/ndp48-x86-x64-allos-enu.exe

本文中的安装示例包:

链接: 链接: https://pan.baidu.com/s/1aMUEs_F74whkGEzubInkfw

提取码: 2g6y

 

NSIS使用到的插件

1、nsNiuniuSkin:基于Duilib的界面库(自定义界面的界面库)

2、nsis7zU:压缩及解压

3、inetc:下载文件(增加下载回调,当前进度,下载包大小,已下载大小,下载速度 ,剩余时间等信息)

4、KillProcDLL:结束进程(增加向结束进程发送主线程消息,进而实现被结束的进程安全退出,默认的结束方式为强制结束进程)

 

系统相关的问题

1、Win10系统使用NSIS创建任务栏图标会失败,Win10以下的系统无问题。

2、如果你的应用程序启动需要管理员身份启动,哪么添加开机启动将会失败。

 

制作好的安装包安装过程:

安装过程的逻辑

1、验证系统当前的net版本是否低于 4.8.03761,如果低于 4.8.03761 则做如下逻辑:

  •      下载微软证书
  •      安装微软证书
  •      下载net安装包
  •      安装net安装包

 

NSIS功能代码分享

 

代码段相关的宏定义

  1. # ====================== 自定义宏 产品信息==============================
  2. !define PRODUCT_NAME "ScreenToGif"
  3. #安装卸载项用到的KEY
  4. !define PRODUCT_PATHNAME "ScreenToGif"
  5. #安装路径追加的名称
  6. !define INSTALL_APPEND_PATH "ScreenToGif"
  7. #默认生成的安装路径
  8. !define INSTALL_DEFALT_SETUPPATH ""
  9. #执行文件名称
  10. !define EXE_NAME "ScreenToGif.exe"
  11. #版本号
  12. !define PRODUCT_VERSION "1.0.0.0"
  13. #主页地址
  14. !define HOME_URL "https://www.screentogif.com/"
  15. #用户条款
  16. !define TERMS_URL ""
  17. #产品发布商
  18. !define PRODUCT_PUBLISHER "Nicke Manarin"
  19. #产品法律
  20. !define PRODUCT_LEGAL "Nicke Manarin Copyright(c)2020"
  21. #打包出来的文件名称
  22. !define INSTALL_OUTPUT_NAME "ScreenToGif_${PRODUCT_VERSION}.exe"
  23. #应用程序的数据目录
  24. !define LOCAL_APPDATA_DIR "$LOCALAPPDATA\ScreenToGif"
  25. #打包文件目录
  26. !define APP_FILE_DIR "D:\myCode\app\app-qt-client\PackageDirectory\ScreenToGif"
  27. #文件数量
  28. !define APP_FILE_COUNT 9
  29. #完整安装包下载地址
  30. !define ALL_SETUP_DL_URL ""
  31. #Net包名称
  32. !define NET_PACK_NAME "ndp48-x86-x64-allos-enu.exe"
  33. #Net包下载地址
  34. !define NET_PACK_DL_URL "https://download.visualstudio.microsoft.com/download/pr/014120d7-d689-4305-befd-3cb711108212/0fd66638cde16859462a6243a4629a50/ndp48-x86-x64-allos-enu.exe"
  35. #微软证书名称(win7安装net4.6以上版本需下载微软证书并安装,否则net安装会失败)
  36. #net4.0不需要安装微软证书
  37. !define MS_ROOT_CERT_NAME "MicrosoftRootCertificateAuthority2011.cer"
  38. #微软证书下载地址
  39. !define MS_ROOT_CERT_DL_URL "https://download.microsoft.com/download/2/4/8/248D8A62-FCCD-475C-85E7-6ED59520FC0F/MicrosoftRootCertificateAuthority2011.cer"

 

获取net版本

  1. ;获取.Net Framework版本支持
  2. Function GetNetFrameworkVersion
  3. Push $1
  4. Push $0
  5. ReadRegDWORD $0 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v4\Full" "Install"
  6. ReadRegDWORD $1 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v4\Full" "Version"
  7. StrCmp $0 1 KnowNetFrameworkVersion +1
  8. ReadRegDWORD $0 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v3.5" "Install"
  9. ReadRegDWORD $1 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v3.5" "Version"
  10. StrCmp $0 1 KnowNetFrameworkVersion +1
  11. ReadRegDWORD $0 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v3.0\Setup" "InstallSuccess"
  12. ReadRegDWORD $1 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v3.0\Setup" "Version"
  13. StrCmp $0 1 KnowNetFrameworkVersion +1
  14. ReadRegDWORD $0 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v2.0.50727" "Install"
  15. ReadRegDWORD $1 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v2.0.50727" "Version"
  16. StrCmp $1 "" +1 +2
  17. StrCpy $1 "2.0.50727.832"
  18. StrCmp $0 1 KnowNetFrameworkVersion +1
  19. ReadRegDWORD $0 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v1.1.4322" "Install"
  20. ReadRegDWORD $1 HKLM "SOFTWARE\Microsoft\NET Framework Setup\NDP\v1.1.4322" "Version"
  21. StrCmp $1 "" +1 +2
  22. StrCpy $1 "1.1.4322.573"
  23. StrCmp $0 1 KnowNetFrameworkVersion +1
  24. ReadRegDWORD $0 HKLM "SOFTWARE\Microsoft\.NETFramework\policy\v1.0" "Install"
  25. ReadRegDWORD $1 HKLM "SOFTWARE\Microsoft\.NETFramework\policy\v1.0" "Version"
  26. StrCmp $1 "" +1 +2
  27. StrCpy $1 "1.0.3705.0"
  28. StrCmp $0 1 KnowNetFrameworkVersion +1
  29. StrCpy $1 "not .NetFramework"
  30. KnowNetFrameworkVersion:
  31. Pop $0
  32. Exch $1
  33. FunctionEnd

 

下载微软证书

  1. ; 微软证书下载回调
  2. Function MicrosoftCertificatePackDownLoadCallBack
  3. ; 0-当前进度(百分比)
  4. Pop $0
  5. ; 1-累计大小
  6. Pop $1
  7. ; 2-已下载大小
  8. Pop $2
  9. ; 3-下载速度
  10. Pop $3
  11. ; 4-剩余时间
  12. Pop $4
  13. ;更新包下载进度
  14. ; 当前进度
  15. push $0
  16. ; 当前剩余时间
  17. push $4
  18. FunctionEnd
  19. ;下载微软证书
  20. Function DownloadMicrosoftCertificate
  21. GetFunctionAddress $R9 MicrosoftCertificatePackDownLoadCallBack
  22. inetc::get "${MS_ROOT_CERT_DL_URL}" "$TEMP\${MS_ROOT_CERT_NAME}" $R9
  23. ; 读取值
  24. Pop $1
  25. ; 写入值($1="ok"表示下载成功)
  26. Push $1
  27. FunctionEnd

 

安装微软证书

  1. AddCertificateToStore
  2. Exch $0
  3. Push $1
  4. Push $R0
  5. System::Call "crypt32::CryptQueryObject(i ${CERT_QUERY_OBJECT_FILE}, w r0, \
  6. i ${CERT_QUERY_CONTENT_FLAG_ALL}, i ${CERT_QUERY_FORMAT_FLAG_ALL}, \
  7. i 0, i 0, i 0, i 0, i 0, i 0, *i .r0) i .R0"
  8. ${If} $R0 <> 0
  9. System::Call "crypt32::CertOpenStore(i ${CERT_STORE_PROV_SYSTEM}, i 0, i 0, \
  10. i ${CERT_STORE_OPEN_EXISTING_FLAG}|${CERT_SYSTEM_STORE_LOCAL_MACHINE}, \
  11. w 'ROOT') i .r1"
  12. ${If} $1 <> 0
  13. System::Call "crypt32::CertAddCertificateContextToStore(i r1, i r0, \
  14. i ${CERT_STORE_ADD_ALWAYS}, i 0) i .R0"
  15. System::Call "crypt32::CertFreeCertificateContext(i r0)"
  16. ${If} $R0 = 0
  17. StrCpy $0 "Unable to add certificate to certificate store"
  18. ${Else}
  19. StrCpy $0 "success"
  20. ${EndIf}
  21. System::Call "crypt32::CertCloseStore(i r1, i 0)"
  22. ${Else}
  23. System::Call "crypt32::CertFreeCertificateContext(i r0)"
  24. StrCpy $0 "Unable to open certificate store"
  25. ${EndIf}
  26. ${Else}
  27. StrCpy $0 "Unable to open certificate file"
  28. ${EndIf}
  29. Pop $R0
  30. Pop $1
  31. Exch $0
  32. FunctionEnd
  33. ; 安装微软证书
  34. Function InstallMicrosoftCertificate
  35. Push $TEMP\${MS_ROOT_CERT_NAME}
  36. Call AddCertificateToStore
  37. Pop $0
  38. ${If} $0 == success
  39. ; 安装完成,删除文件
  40. Delete "$TEMP\${MS_ROOT_CERT_NAME}"
  41. ${EndIf}
  42. ; $0=success表示安装成功
  43. Push $0
  44. FunctionEnd

 

下载net安装包

  1. ; Net安装包下载回调
  2. Function NetPackDownLoadCallBack
  3. ; 0-当前进度(百分比)
  4. Pop $0
  5. ; 1-累计大小
  6. Pop $1
  7. ; 2-已下载大小
  8. Pop $2
  9. ; 3-下载速度
  10. Pop $3
  11. ; 4-剩余时间
  12. Pop $4
  13. FunctionEnd
  14. ;下载 .NET Framework 4.0
  15. Function DownloadNetFramework4
  16. GetFunctionAddress $R9 NetPackDownLoadCallBack
  17. inetc::get "${NET_PACK_DL_URL}" "$TEMP\${NET_PACK_NAME}" $R9
  18. ; 读取值
  19. Pop $1
  20. ; 写入值($1="ok"表示下载成功)
  21. Push $1
  22. FunctionEnd

 

安装net安装包

  1. ; 安装net包
  2. Function InstallDotNetPack
  3. ; 安装net包
  4. ExecWait '$TEMP\${NET_PACK_NAME} /q /norestart /ChainingPackage FullX64Bootstrapper' $R1
  5. ; 安装成功(安装成功返回0 16386 文件损坏 返回当前版本号 文件不存在)
  6. ${If} $R1 == 0
  7. ; 安装完成,删除安装包
  8. Delete "$TEMP\${NET_PACK_NAME}"
  9. ${EndIf}
  10. ; 返回值($R1=0表示安装成功)
  11. Push $R1
  12. FunctionEnd

 

Net环境检测

  1. ; 检查net环境
  2. Function CheckNetCondition
  3. ; net版本验证及安装
  4. ;检测是否是需要的.NET Framework版本
  5. Call GetNetFrameworkVersion
  6. Pop $R1
  7. ; ${If} $R1 < '4.7.03062'
  8. ${If} $R1 < '4.8.03761'
  9. ; 下载微软证书
  10. GetFunctionAddress $0 DownloadMicrosoftCertificate
  11. ; 等待结果
  12. BgWorker::CallAndWait
  13. ; 弹出下载结果
  14. Pop $R1
  15. ; 下载成功验证
  16. ${If} $R1 == "ok"
  17. ; 微软证书
  18. GetFunctionAddress $0 InstallMicrosoftCertificate
  19. BgWorker::CallAndWait
  20. ; 弹出安装结果
  21. Pop $R2
  22. ; 安装结果验证
  23. ${If} $R2 != success
  24. #微软证书安装完成
  25. ${Endif}
  26. ${EndIf}
  27. ; 下载net安装包
  28. GetFunctionAddress $0 DownloadNetFramework4
  29. ; 等待结果
  30. BgWorker::CallAndWait
  31. ; 弹出下载结果
  32. Pop $R3
  33. ; 下载成功验证
  34. ${If} $R3 == "ok"
  35. ; 安装net包
  36. GetFunctionAddress $0 InstallDotNetPack
  37. BgWorker::CallAndWait
  38. ; 弹出安装结果
  39. Pop $R4
  40. ; 安装结果验证
  41. ${If} $R4 == 0
  42. #net包安装成功
  43. ${EndIf}
  44. ${EndIf}
  45. ${EndIf}
  46. FunctionEnd

 

结束指定进程

  1. #注:ShowMsgBox 可更换为MessageBox使用系统提示框提示
  2. ; 结束进程
  3. ; 返回0 表示结束成功 返回1 表示退出安装
  4. Function KillProc
  5. #此处检测当前是否有程序正在运行,如果正在运行,提示先卸载再安装
  6. nsProcess::_FindProcess "${EXE_NAME}"
  7. Pop $R0
  8. #验证查询结果
  9. ${If} $R0 == 0
  10. ; 弹框提示
  11. StrCpy $R8 "检测到 ${EXE_NAME} 正在运行。点击 “确定” 结束进程${EXE_NAME},继续安装。点击 “取消” 退出安装程序。"
  12. StrCpy $R7 "1"
  13. Call ShowMsgBox
  14. Pop $0
  15. ; 结束进程
  16. ${If} $0 == 1
  17. ; 设置安装提示
  18. nsNiuniuSkin::SetControlAttribute $hInstallDlg "progress_tip" "text" "正在安全的结束进程,请稍后..."
  19. #结束进程
  20. KillProcDLL::KillProc"${EXE_NAME}"
  21. ${Else}
  22. #设置返回值
  23. push 1
  24. ; 退出
  25. goto KillProcEnd
  26. ${EndIf}
  27. #循环验证
  28. ${For} $R1 0 100
  29. #等待100毫秒再查询结果
  30. Sleep 100
  31. #接收结果
  32. nsProcess::_FindProcess "${EXE_NAME}"
  33. #检测进程
  34. Pop $R0
  35. ; 判断进程是否存在
  36. ${If} $R0 != 0
  37. #设置返回值
  38. push 0
  39. ; 查找进程结束
  40. goto KillProcEnd
  41. ${EndIf}
  42. ${Next}
  43. ; 弹框提示
  44. StrCpy $R8 "我们无法安全的结束正在运行的 ${EXE_NAME} 应用程序,请手动退出应用程序,再尝试安装!"
  45. StrCpy $R7 "0"
  46. Call ShowMsgBox
  47. #设置返回值
  48. push 1
  49. ; 结束
  50. KillProcEnd:
  51. ${EndIf}
  52. FunctionEnd

 

创建桌面快捷方式

  1. ;创建桌面快捷方式
  2. Function CreateDeskTopIco
  3. #添加到桌面快捷方式的动作在此添加
  4. SetShellVarContext all
  5. CreateShortCut "$DESKTOP\${PRODUCT_NAME}.lnk" "$INSTDIR\${EXE_NAME}"
  6. SetShellVarContext current
  7. FunctionEnd

 

创建任务栏快捷方式

注:Win10下可能存在问题,系统机制原因

  1. ;创建任务栏快捷方式
  2. Function CreateBarlnk
  3. ReadRegStr $R0 HKLM "SOFTWARE\Microsoft\Windows NT\CurrentVersion" "CurrentVersion"
  4. ${if} $R0 >= 6.0
  5. SetOutPath $INSTDIR
  6. ;注意这句与下一句是有先后顺序的(与ExecShell taskbarpin关联)
  7. CreateShortCut "$DESKTOP\${PRODUCT_NAME}.lnk" "$INSTDIR\${EXE_NAME}"
  8. ;创建任务栏快捷方式(win10系统会失败,并且导致程序运行)
  9. ;ExecShell taskbarpin "$DESKTOP\${PRODUCT_NAME}.lnk"
  10. ${StdUtils.InvokeShellVerb} $0 "$INSTDIR" "${EXE_NAME}" ${StdUtils.Const.ShellVerb.PinToTaskbar}
  11. ${else}
  12. CreateShortCut "$QUICKLAUNCH\${PRODUCT_NAME}.lnk" "$INSTDIR\${EXE_NAME}"
  13. ${Endif}
  14. FunctionEnd

 

添加开机启动

注:应用软件如果需要管理员身份启动,开机可能无法正常启动

  1. ; 创建开机启动
  2. ; 备注:开机启动的项目不能为管理员身份启动,否则会启动不起来
  3. Function CreateBootStart
  4. WriteRegStr HKCU "Software\Microsoft\Windows\CurrentVersion\Run" "${PRODUCT_NAME}" "$INSTDIR\${EXE_NAME}"
  5. FunctionEnd

 

创建开始菜单

  1. Function CreateAppShortcut
  2. SetShellVarContext all
  3. CreateDirectory "$SMPROGRAMS\${PRODUCT_NAME}"
  4. CreateShortCut "$SMPROGRAMS\${PRODUCT_NAME}\${PRODUCT_NAME}.lnk" "$INSTDIR\${EXE_NAME}"
  5. CreateShortCut "$SMPROGRAMS\${PRODUCT_NAME}\卸载${PRODUCT_NAME}.lnk" "$INSTDIR\uninst.exe"
  6. SetShellVarContext current
  7. FunctionEnd

 

创建卸载信息

  1. # 生成卸载入口
  2. Function CreateUninstall
  3. #写入注册信息
  4. SetRegView 32
  5. WriteRegStr HKLM "Software\${PRODUCT_PATHNAME}" "InstPath" "$INSTDIR"
  6. ; WriteUninstaller "$INSTDIR\uninst.exe"
  7. # 添加卸载信息到控制面板
  8. WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\${PRODUCT_PATHNAME}" "DisplayName" "${PRODUCT_NAME}"
  9. WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\${PRODUCT_PATHNAME}" "UninstallString" "$INSTDIR\uninst.exe"
  10. WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\${PRODUCT_PATHNAME}" "DisplayIcon" "$INSTDIR\${EXE_NAME}"
  11. WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\${PRODUCT_PATHNAME}" "Publisher" "${PRODUCT_PUBLISHER}"
  12. WriteRegStr HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\${PRODUCT_PATHNAME}" "DisplayVersion" "${PRODUCT_VERSION}"
  13. FunctionEnd

 

卸载-删除快捷方式

  1. ;卸载时删除任务栏快捷方式
  2. Function un.DelBarlnk
  3. ReadRegStr $R0 HKLM "SOFTWARE\Microsoft\Windows NT\CurrentVersion" "CurrentVersion"
  4. ${if} $R0 >= 6.0
  5. ;win10系统会有问题
  6. ExecShell taskbarunpin "$DESKTOP\${PRODUCT_NAME}.lnk"
  7. ${StdUtils.InvokeShellVerb} $0 "$INSTDIR" "${EXE_NAME}" ${StdUtils.Const.ShellVerb.UnpinFromTaskbar}
  8. Delete "$DESKTOP\${PRODUCT_NAME}.lnk"
  9. ${else}
  10. delete "$QUICKLAUNCH\${PRODUCT_NAME}.lnk"
  11. ${Endif}
  12. FunctionEnd
  13. ;删除开始菜单,桌面图标
  14. Function un.DeleteShotcutAndInstallInfo
  15. SetRegView 32
  16. DeleteRegKey HKLM "Software\${PRODUCT_PATHNAME}"
  17. DeleteRegKey HKLM "Software\Microsoft\Windows\CurrentVersion\Uninstall\${PRODUCT_PATHNAME}"
  18. ; 删除快捷方式
  19. SetShellVarContext all
  20. Delete "$SMPROGRAMS\${PRODUCT_NAME}\${PRODUCT_NAME}.lnk"
  21. Delete "$SMPROGRAMS\${PRODUCT_NAME}\卸载${PRODUCT_NAME}.lnk"
  22. RMDir "$SMPROGRAMS\${PRODUCT_NAME}\"
  23. Delete "$DESKTOP\${PRODUCT_NAME}.lnk"
  24. #删除开机启动
  25. Delete "$SMSTARTUP\${PRODUCT_NAME}.lnk"
  26. SetShellVarContext current
  27. FunctionEnd

 

卸载删除开机启动

  1. ;卸载时删除开机启动
  2. Function un.DelBootStart
  3. DeleteRegValue HKCU "Software\Microsoft\Windows\CurrentVersion\Run" "${PRODUCT_NAME}"
  4. FunctionEnd

 

打开链接

  1. ; 打开链接
  2. !define OpenURL '!insertmacro "_OpenURL"'
  3. ; 打开链接
  4. !macro _OpenURL URL
  5. Push "${URL}"
  6. Call openLinkNewWindow
  7. !macroend
  8. ; 新窗口打开链接
  9. Function openLinkNewWindow
  10. Push $3
  11. Exch
  12. Push $2
  13. Exch
  14. Push $1
  15. Exch
  16. Push $0
  17. Exch
  18. ReadRegStr $0 HKCR "http\shell\open\command" ""
  19. # Get browser path
  20. DetailPrint $0
  21. StrCpy $2 '"'
  22. StrCpy $1 $0 1
  23. StrCmp $1 $2 +2 # if path is not enclosed in " look for space as final char
  24. StrCpy $2 ' '
  25. StrCpy $3 1
  26. loop:
  27. StrCpy $1 $0 1 $3
  28. DetailPrint $1
  29. StrCmp $1 $2 found
  30. StrCmp $1 "" found
  31. IntOp $3 $3 + 1
  32. Goto loop
  33. found:
  34. StrCpy $1 $0 $3
  35. StrCmp $2 " " +2
  36. StrCpy $1 '$1"'
  37. Pop $0
  38. Exec '$1 $0'
  39. Pop $0
  40. Pop $1
  41. Pop $2
  42. Pop $3
  43. FunctionEnd
  44. ;使用示例
  45. ${OpenURL} "www.baidu.com"

 

完整源码下载

https://github.com/zhaobangyu/NSIS/tree/NsisPackage

声明:本文内容由网友自发贡献,不代表【wpsshop博客】立场,版权归原作者所有,本站不承担相应法律责任。如您发现有侵权的内容,请联系我们。转载请注明出处:https://www.wpsshop.cn/w/凡人多烦事01/article/detail/112615
推荐阅读
相关标签
  

闽ICP备14008679号