解决安装过程拖拽导致完成页面卡死

!define PRODUCT_NAME "解决安装过程拖拽导致完成页面卡死"
!define PRODUCT_VERSION "1.0"

Name "${PRODUCT_NAME} ${PRODUCT_VERSION}"
OutFile "Text.exe"
InstallDir "$PROGRAMFILES\Text"
ShowInstDetails show
ShowUnInstDetails show

!include "MUI2.nsh"
!include "nsDialogs.nsh"

; 欢迎页面
!insertmacro MUI_PAGE_WELCOME
; 许可协议页面
; 安装目录选择页面
!insertmacro MUI_PAGE_DIRECTORY
; 安装过程页面
!insertmacro MUI_PAGE_INSTFILES
; 如果使用默认的安装完成页面，还是会卡死。所以用自己写个完成页面就好了！~
;!insertmacro MUI_PAGE_FINISH
Page custom finish
!insertmacro MUI_LANGUAGE "SimpChinese"

Section "MainSection" SEC01
sleep 200
sleep 200
sleep 200
sleep 200
sleep 200
sleep 200
sleep 200
sleep 200
sleep 200
sleep 200
sleep 200
sleep 200
sleep 200
GetDlgItem $5 $HWNDPARENT 1
EnableWindow $5 1
SendMessage $5 ${BM_CLICK} 0 0
SectionEnd

Function finish
 nsDialogs::Create /NOUNLOAD 1018
 Pop $0
 ${If} $0 == error
 Abort
 ${EndIf}
 nsDialogs::Show
FunctionEnd