;nsDialogs根据输入文字变换输入框背景颜色作指示。根据输入的文本实现控制文本西式背景颜色会改变到黄色(没有输入)或红色(错误输入)。
Caption "根据输入文字变换输入框背景颜色作指示"
OutFile "ColorfulErrors.exe"
BrandingText "WwW.pythonschool.CoM"
loadlanguagefile "${NSISDIR}ContribLanguage filessimpChinese.nlf"
;includes
!include nsDialogs.nsh
!include LogicLib.nsh
;variables
Var Dialog
Var Directory
Var ButtonClear
Var ButtonReset
;definitions
!define YELLOW "0xfff799"
!define RED "0xf69679"
;页面
Page custom nsDialogsPage nsDialogsLeave
Page InstFiles
;函数
Function nsDialogsPage
nsDialogs::Create /NOUNLOAD 1018
Pop $Dialog
${If} $Dialog == error
Abort
${EndIf}
${NSD_CreateLabel} 0 0 100% 65%
"此例子使用背景颜色来显示文本框状态。要了解此例子,您可以:$n$n$t1. 修改或删除文本框内路径$n$t2. 点击清空按钮$n$t3. 点击重置按钮$n$n正如您所看到的,文本框背景颜色的变化取决于您的输入。错误的路径会显示红色、输入框置空会显示黄色。仅当路径为 $$DESKTOP 会显示文本框默认的颜色。"
${NSD_CreateText} 0 65% 75% 20 "$DESKTOP"
Pop $Directory
${NSD_OnChange} $Directory OnChange
${NSD_CreateButton} 78% 65% 10% 20 "清空"
Pop $ButtonClear
${NSD_OnClick} $ButtonClear OnClickClear
${NSD_CreateButton} 90% 65% 10% 20 "重置"
Pop $ButtonReset
${NSD_OnClick} $ButtonReset OnClickReset
${NSD_CreateLabel} 0 85% 100% 15% "PS: 但遗憾的是,您可能需离开控件时才看到效果!"
nsDialogs::Show
FunctionEnd
Function nsDialogsLeave
${NSD_GetText} $Directory $0
${If} $0 == ""
MessageBox MB_YESNO|MB_ICONEXCLAMATION "填入当前用户桌面路径,忽略?" IDYES +2
Abort
${ElseIfNot} $0 == "$DESKTOP"
MessageBox MB_YESNO|MB_ICONEXCLAMATION "并非当前用户桌面路径,忽略?" IDYES +2
Abort
${EndIf}
FunctionEnd
Function OnChange
Pop $0 # HWND
${NSD_GetText} $Directory $0
${If} $0 == ""
SetCtlColors $Directory "" ${YELLOW}
${Else}
${If} ${FileExists} "$0*.*"
SetCtlColors $Directory "" "" ;重置颜色
${Else}
SetCtlColors $Directory "" ${RED}
${EndIf}
${EndIf}
FunctionEnd
Function OnClickClear
Pop $0 # HWND
${NSD_SetText} $Directory ""
FunctionEnd
Function OnClickReset
Pop $0 # HWND
${NSD_SetText} $Directory "$DESKTOP"
FunctionEnd
Section
Quit
SectionEnd
免责声明：根据《计算机软件保护条例》第十七条规定“为了学习和研究软件内含的设计思想和原理，通过安装、显示、传输或者存储软件等方式使用软件的，可以不经软件著作权人许可，不向其支付报酬。”您需知晓本站所有内容资源均来源于网络，仅供用户交流学习与研究使用，版权归属原版权方所有，版权争议与本站无关，用户本人下载后不能用作商业或非法用途，需在24个小时之内从您的电脑中彻底删除上述内容，否则后果均由用户承担责任；如果您访问和下载此文件，表示您同意只将此文件用于参考、学习而非其他用途，否则一切后果请您自行承担，如果您喜欢该程序，请支持正版软件，购买注册，得到更好的正版服务。丨本站为个人博客非盈利性站点，所有软件信息均来自网络，所有资源仅供学习参考研究目的，并不贩卖软件，不存在任何商业目的及用途。丨本文采用知识共享 署名4.0国际许可协议 [BY-NC-SA] 进行授权BY-NC-SA协议进行授权
转载请注明：永恒心锁-分享互联网 » 根据输入文字变换输入框背景颜色作指示