NSIS检测到窗口最小化闪烁提示

水晶石专栏

已于 2022-06-04 13:36:55 修改

阅读量211

点赞数

分类专栏： NSIS 原创文章标签： NSIS 窗口最小化

于 2022-06-03 22:34:13 首次发布

本文链接：https://blog.csdn.net/shuijing_0/article/details/125116788

版权

NSIS 同时被 2 个专栏收录

28 篇文章 5 订阅

订阅专栏

原创

24 篇文章 1 订阅

订阅专栏

#检测到窗口为最小化时闪烁提示
!include nsDialogs.nsh
#编写：水晶石
Name "IsIconic Example"
OutFile "IsIconic.exe"
XPStyle on
########################################################
var Syslink
Var DIALOG
#######################################################

Page custom nsDialogsPage mypageleave
########################################################

Function OnTimer
  System::Call "user32::IsIconic(p$HWNDPARENT)i.r1"   #返回值为非0代表窗口被最小化
${if} $1 != 0
  System::Call "user32::FlashWindow(p $HWNDPARENT,i 1)"
${EndIf}
FunctionEnd
;____________________________________________________________________________
Function OnSyslink
Pop $R0
   Pop $R1
    Pop $R2
     ${If} $R1 = -2
       ${OrIf} $R1 = -4
        System::Call `*$R2(i, i, i, i, i .R3)`
       ${If} $R3 = 0
       ExecShell open `http://blog.csdn.net/shuijing_0`
    ${EndIf}
${EndIf}
FunctionEnd
;_____________________________________________________________________________
Function mypageleave
   nsDialogs::KillTimer  OnTimer
FunctionEnd
#__________________________________________________________________________
Function nsDialogsPage
  nsDialogs::Create 1018
	Pop $DIALOG
  nsDialogs::CreateControl /NOUNLOAD SysLink ${WS_CHILD}|${WS_VISIBLE}|${WS_TABSTOP} 0 10u 30u -20u 10u `最小化时闪烁提示，更多范例教程访问<A>我的博客</A>`
  pop $Syslink
  ${NSD_OnNotify} $syslink Onsyslink
  ${NSD_CreateTimer}  OnTimer 100
	nsDialogs::Show
FunctionEnd

Section
SectionEnd

点击入群