NSIS checkBox选择框的选中 （学习五）


#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