最新消息:

NSIS checkBox选择框的选中 (学习五)

nsis 永恒心锁 1837浏览 0评论
#1、搭建界面的代码

;界面的checkBox框(桌面快捷方式,任务栏快捷方式) taskbarpin ShortCut
 ${NSD_CreateButton} 202 120 15 15 ""
 Pop $Ck_DesktopShortCut
 StrCpy $1 $Ck_DesktopShortCut
 Call SkinBtn_Checked
 GetFunctionAddress $3 OnClick_CheckDesktopShortCut
 SkinBtn::onClick $1 $3
 StrCpy $Bool_DesktopShortCut 1
 ${NSD_CreateLabel} 222 120 100 15 "创建桌面快捷方式"
 Pop $Lbl_DesktopShortCut
 SetCtlColors $Lbl_DesktopShortCut "" transparent ;背景设成透明
 
 ${NSD_CreateButton} 202 162 15 15 ""
 Pop $Ck_taskbarpin
 StrCpy $1 $Ck_taskbarpin
 Call SkinBtn_Checked
 GetFunctionAddress $3 OnClick_taskbarpin
 SkinBtn::onClick $1 $3
 StrCpy $Bool_taskbarpin 1
 ${NSD_CreateLabel} 222 162 100 15 "创建任务栏快捷方式"
 Pop $Lbl_taskbarpin
 SetCtlColors $Lbl_taskbarpin "" transparent ;背景设成透明

#2、事件代码

;点击checkBox桌面快捷方式的处理事件
Function OnClick_CheckDesktopShortCut
 ${IF} $Bool_DesktopShortCut == 1
 IntOp $Bool_DesktopShortCut $Bool_DesktopShortCut - 1
 StrCpy $1 $Ck_DesktopShortCut
 Call SkinBtn_UnChecked
 ;EnableWindow $Btn_Install 0 ;是否显示按钮
 ${ELSE}
 IntOp $Bool_DesktopShortCut $Bool_DesktopShortCut + 1
 StrCpy $1 $Ck_DesktopShortCut
 Call SkinBtn_Checked
 ;EnableWindow $Btn_Install 1
 ${EndIf}
FunctionEnd

;点击checkBox桌面任务栏快捷方式的处理事件
Function OnClick_taskbarpin
 ${IF} $Bool_taskbarpin == 1
 IntOp $Bool_taskbarpin $Bool_taskbarpin - 1
 StrCpy $1 $Ck_taskbarpin
 Call SkinBtn_UnChecked
 ${ELSE}
 IntOp $Bool_taskbarpin $Bool_taskbarpin + 1
 StrCpy $1 $Ck_taskbarpin
 Call SkinBtn_Checked
 ${EndIf}
FunctionEnd

Function OnClick_Finish
 ;当选择了生成快捷方式的combox的选择框时
 ${If} $Bool_taskbarpin == 1
 ${AndIf} $Bool_DesktopShortCut == 1
 ;生成桌面的快捷方式
 CreateShortCut "$DESKTOP\Electron.lnk" "$INSTDIR\Electron.exe"
 ;生成任务栏的快捷方式
 ExecShell "taskbarpin" "$DESKTOP\Electron.lnk"
 ${ElseIf} $Bool_taskbarpin == 1
 ;生成安装目录的快捷方式
 CreateShortCut "$INSTDIR\Electron.lnk" "$INSTDIR\Electron.exe"
 ;创建任务栏快捷方式
 ExecShell "taskbarpin" "$DESKTOP\Electron.lnk"
 ${ElseIf} $Bool_DesktopShortCut == 1
 ;生成桌面的快捷方式
 CreateShortCut "$DESKTOP\Electron.lnk" "$INSTDIR\Electron.exe"
 ${Else}
 ${EndIf}
 Call onClickClose ;点击关闭响应的事件
FunctionEnd


;点击右上角关闭按钮
Function onClickClose
 #关闭窗体的方法一:
 FindProcDLL::FindProc "pkpm.exe"
 Sleep 10
 Pop $R0
 ${If} $R0 != 0
 KillProcDLL::KillProc "pkpm.exe"
 ${EndIf}
 #关闭窗体的方法二:
 ;SendMessage $hwndparent ${WM_CLOSE} 0 0
FunctionEnd

;点击关闭按钮响应的函数
Function onClose
 Call onClickClose ;点击关闭响应的事件
FunctionEnd
免责声明:根据《计算机软件保护条例》第十七条规定“为了学习和研究软件内含的设计思想和原理,通过安装、显示、传输或者存储软件等方式使用软件的,可以不经软件著作权人许可,不向其支付报酬。”您需知晓本站所有内容资源均来源于网络,仅供用户交流学习与研究使用,版权归属原版权方所有,版权争议与本站无关,用户本人下载后不能用作商业或非法用途,需在24个小时之内从您的电脑中彻底删除上述内容,否则后果均由用户承担责任;如果您访问和下载此文件,表示您同意只将此文件用于参考、学习而非其他用途,否则一切后果请您自行承担,如果您喜欢该程序,请支持正版软件,购买注册,得到更好的正版服务。丨本站为个人博客非盈利性站点,所有软件信息均来自网络,所有资源仅供学习参考研究目的,并不贩卖软件,不存在任何商业目的及用途。丨本文采用知识共享 署名4.0国际许可协议 [BY-NC-SA] 进行授权BY-NC-SA协议进行授权

转载请注明:永恒心锁-分享互联网 » NSIS checkBox选择框的选中 (学习五)

发表我的评论
取消评论
表情

Hi,您需要填写昵称和邮箱!

  • 昵称 (必填)
  • 邮箱 (必填)
  • 网址