搜索到
29
篇与
nsisfans
的结果
-
-
NSIS检测注册表键是否存在 一定要定义注册表主键，否则检测无效。Name "检测注册表键是否存在" OutFile "检测注册表键是否存在.exe" ;定义注册表主键 !define HKEY_CLASSES_ROOT 0x80000000 !define HKEY_CURRENT_USER 0x80000001 !define HKEY_LOCAL_MACHINE 0x80000002 !define HKEY_USERS 0x80000003 Section Pop $R1 Pop $R0 System::Call "*(i 0) i .R0" ;为键的句柄创建一个缓存 Push "Software\Daum\PotPlayerMini64\Positions" ;将要检测的键放入内存中 system::call 'Advapi32::RegOpenKey(i ${HKEY_CURRENT_USER}, t s, i R0) .iR1' ;调用API进行检查，返回值在$R1中 system::call 'Advapi32::RegCloseKey(i R0)' ;关闭该键的句柄 system::free ;释放内存 ;返回值： ;0代表键存在 ;2代表键不存在 ;其它值表示出错 MessageBox MB_OK "$R1" SectionEnd
-
NSIS检测http默认打开程序并终止其进程 有人问相关问题，写着玩的。发出来可能对新手有帮助。代码来自：少轻狂Name http OutFile http.exe !include "FileFunc.nsh" !include "WordFunc.nsh" Section ReadRegStr $R1 HKCR "http\shell\open\command" "" MessageBox MB_OK "$R1" ${GetFileName} "$R1" $R2 ${WordFind} "$R2" ".exe" "+1" $R3 KillerHTTP: killer::KillProcess "$R3.exe" killer::IsProcessRunning "$R3.exe" Pop $R0 StrCmp $R0 1 KillerHTTP NextHTTP NextHTTP: SectionEnd
-
NSIS比较版本号 代码来自：少轻狂Name ver OutFile ver.exe !include "MUI2.nsh" !include "WordFunc.nsh" Section - "比较版本号" ReadRegStr $R1 HKLM "SOFTWARE\Microsoft\Windows NT\CurrentVersion" CurrentVersion MessageBox MB_OK "$R1" ${VersionCompare} "6.1" "$R1" $R2 ${If} $R2 == 0 MessageBox MB_OK "版本相同($R1)" ${ElseIf} $R2 == 1 MessageBox MB_OK "已安装版本低($R1)" ${ElseIf} $R2 == 2 MessageBox MB_OK "已安装版本高($R1)" ${EndIf} SectionEnd
-
NSIS检测当前默认浏览器 通过读注册表检测当前默认浏览器，读取路径及浏览器名称并判断是否运行调用杀掉进程。测试环境：WInXP、WIn7、Win10 (IE、360、谷歌、QQ、搜狗、火狐)浏览器都读取有效。其它浏览器未测试。代码来自：星空不寂寞XPStyle on Page instfiles OutFile "Progid.exe" Name "Progid" Section ReadRegStr $R0 HKCU "Software\Microsoft\Windows\Shell\Associations\UrlAssociations\http\UserChoice" "Progid" ReadRegStr $R2 HKLM "SOFTWARE\Classes\$R0\shell\open\command" "" System::Call `shlwapi::PathRemoveArgs(tR2R2)` System::Call "shlwapi::PathUnquoteSpaces(tR2R2)" System::Call "shlwapi::PathRemoveFileSpec(tR2R3)" System::Call "shlwapi::PathStripPath(tR2R2)" MessageBox MB_ICONINFORMATION "当前默认浏览器名称：$R2 $\n$\n安装路径为：$R3" killer::IsProcessRunning "$R2" Pop $0 IntCmp $0 1 0 No MessageBox MB_YESNO|MB_ICONQUESTION "检查到浏览器正在运行是否关闭进程？" IDNO +2 killer::KillProcess $0 No: SectionEnd
-
NSIS插件：PropDlg——显示文件或文件夹属性对话框 一个可以显示文件或文件夹属性对话框的插件。!addplugindir . Name Example OutFile Example.exe SetCompressor lzma ShowInstDetails show InstallColors /windows XPStyle on RequestExecutionLevel user Page instfiles Section "Install" ;显示文件/文件夹属性对话框 PropDlg::Show "C:\Windows\Regedit.exe" SectionEnd下载地址：隐藏内容，请前往内页查看详情
-
-
-
NSIS增加关于按钮示例 如果是使用Unicode版的NSIS，请将此文件转为Unicode编码。!ifdef NSIS_UNICODE !AddPluginDir Plugins\Unicode !else !AddPluginDir Plugins !endif !AddIncludeDir Include !include "MUI2.nsh" !include "dialog.nsh" Name "About Button Example" OutFile AboutButton.exe InstallDir $TEMP RequestExecutionLevel User !define IDC_ABOUT 1300 !define MUI_CUSTOMFUNCTION_GUIINIT onGUIInit !insertmacro MUI_PAGE_WELCOME !insertmacro MUI_PAGE_DIRECTORY !insertmacro MUI_PAGE_INSTFILES !insertmacro MUI_PAGE_FINISH !insertmacro MUI_LANGUAGE "English" !insertmacro MUI_LANGUAGE "SimpChinese" LangString TEXT_BTN ${LANG_ENGLISH} "&About" LangString TEXT_MSG ${LANG_ENGLISH} "This is the About Button example script!" LangString TEXT_BTN ${LANG_SIMPCHINESE} "关于(&A)" LangString TEXT_MSG ${LANG_SIMPCHINESE} "这是关于按钮示例脚本！" Section Install Sleep 250 Sleep 250 Sleep 250 Sleep 250 Sleep 250 Sleep 250 Sleep 250 Sleep 250 Sleep 250 Sleep 250 SectionEnd Function onGUIInit System::Call `user32::SendMessage(i$HWNDPARENT,i${WM_GETFONT},i0,i0)i.s` System::Call `kernel32::GetModuleHandle(in)i.s` System::Call `*(i8,i201,i50,i14)i.R0` System::Call `user32::MapDialogRect(i$HWNDPARENT,iR0)` System::Call `*$R0(i.s,i.s,i.s,i.s)` System::Call `kernel32::GlobalFree(iR0)` System::Call `user32::CreateWindowEx(i,ts,ts,i${BS_PUSHBUTTON}|${WS_CHILD}|${WS_VISIBLE}|${WS_TABSTOP},is,is,is,is,i$HWNDPARENT,i${IDC_ABOUT},is,i)i.s` `Button` `$(TEXT_BTN)` System::Call `user32::SendMessage(is,i${WM_SETFONT},is,i0)` GetFunctionAddress $R0 FuncAbout ButtonEvent::AddEventHandler /NOUNLOAD ${IDC_ABOUT} $R0 FunctionEnd Function FuncAbout DialogBox::Init 220 90 "关于本程序..." Pop $0 ${If} $0 != error ${DB_AddLabel} 10 5 100 8 "这是关于按钮示例脚本！" Pop $1 DialogBox::Show ${EndIf} FunctionEnd Function .onGUIEnd ButtonEvent::Unload FunctionEnd相关插件{anote icon="fa-mouse-pointer" href="https://www.nsisfans.com/DialogBox.html" type="secondary" content="DialogBox"/}
-
NSIS插件：使用PathEnvUtil操作系统环境变量 PathEnvUtil 使用说明1. PathEnvUtil::Append 添加一个路径到 PATH 环境变量添加时，如果待添加的路径重复出现（不区分大小写，末尾有无反斜线均视为同一路径），则只保留一个。添加后，保留的路径出现在原值中第一次出现该路径的位置，大小写和末尾反斜线与参数指定值一致。非参数指定的路径重复出现，不在此插件的去重范围内。返回 0 表示成功，其他值均为错误代码。如 PATH 环境变量原值如下：%SystemRoot%system32;%SystemRoot%;D:Gitbin;D:Gitbin;E:GitHub;D:gitbin;D:gitbin;F:GitLab;添加路径 D:GitBin 之后：%SystemRoot%system32;%SystemRoot%;D:GitBin;E:GitHub;F:GitLab;2. PathEnvUtil::Exists 判断一个路径是否存在于 PATH 环境变量判断时不区分大小写，末尾有无反斜线均视为同一路径，只要出现一次就认为存在。返回 1 表示存在，0 表示不存在。3. PathEnvUtil::Remove 从 PATH 环境变量删除一个路径删除时，如果待删除的路径重复出现（不区分大小写，末尾有无反斜线均视为同一路径），则全部删除。非参数指定的路径重复出现，不在此插件的删除范围内。返回 0 表示成功，其他值均为错误代码。如 PATH 环境变量原值如下：%SystemRoot%system32;%SystemRoot%;D:Gitbin;D:Gitbin;E:GitHub;D:gitbin;D:gitbin;F:GitLab;删除路径 D:GitBin 之后：%SystemRoot%system32;%SystemRoot%;E:GitHub;F:GitLab;下载：隐藏内容，请前往内页查看详情
-
NSIS插件：smbios #Unicode true !ifdef NSIS_UNICODE !addplugindir ".\x86-unicode" !else !addplugindir ".\x86-ansi" !endif Name Example OutFile Example.exe XPStyle on InstallColors /windows ShowInstDetails show Section Install # System Information (Type 1) DetailPrint "========================================" # System Information (Type 1) - Manufacturer smbios::GetSystemManufacturer Pop $R0 DetailPrint "System - Manufacturer: $R0" # System Information (Type 1) - SerialNumber smbios::GetSystemSerialNumber Pop $R0 DetailPrint "System - SerialNumber: $R0" # System Information (Type 1) - ProductName smbios::GetSystemProductName Pop $R0 DetailPrint "System - ProductName: $R0" # System Information (Type 1) - Family smbios::GetSystemFamily Pop $R0 DetailPrint "System - Family: $R0" # System Information (Type 1) - UUID smbios::GetSystemUUID Pop $R0 DetailPrint "System - UUID: $R0" # Baseboard (or Module) (Type 2) DetailPrint "========================================" # Baseboard (or Module) (Type 2) - Manufacturer smbios::GetModuleManufacturer Pop $R0 DetailPrint "Module - Manufacturer: $R0" # Baseboard (or Module) (Type 2) - SerialNumber smbios::GetModuleSerialNumber Pop $R0 DetailPrint "Module - SerialNumber: $R0" # Baseboard (or Module) (Type 2) - ProductName smbios::GetModuleProductName Pop $R0 DetailPrint "Module - ProductName: $R0" # Processor Information (Type 4) DetailPrint "========================================" # Processor Information (Type 4) - Processor ID smbios::GetProcessorID Pop $R0 DetailPrint "Processor - ID: $R0" # Physical Memory Array (Type 16) DetailPrint "========================================" # Physical Memory Array (Type 16) - MaximumCapacity smbios::GetMemoryArrayCapacity Pop $R0 DetailPrint "Memory Array - MaximumCapacity: $R0 MB" # Physical Memory Array (Type 16) - NumberOfMemoryDevices smbios::GetMemoryArrayNumbers Pop $R0 DetailPrint "Memory Array - NumberOfDevices: $R0" # Memory Device (Type 17) DetailPrint "========================================" StrCpy $0 0 lbl_loop: # Memory Device (Type 17) - Size smbios::GetMemorySize $0 Pop $R0 ; no more memory devices found StrCmp $R0 "" lbl_done ; not installed (0) ; size unknown (-1) IntCmp $R0 0 lbl_skip lbl_skip ; size valid DetailPrint "Memory Device [$0] - Size: $R0 MB" # Memory Device (Type 17) - Manufacturer smbios::GetMemoryManufacturer $0 Pop $R0 DetailPrint "Memory Device [$0] - Manufacturer: $R0" # Memory Device (Type 17) - SerialNumber smbios::GetMemorySerialNumber $0 Pop $R0 DetailPrint "Memory Device [$0] - SerialNumber: $R0" # Memory Device (Type 17) - Speed smbios::GetMemorySpeed $0 Pop $R0 DetailPrint "Memory Device [$0] - Speed: $R0 MHz" lbl_skip: IntOp $0 $0 + 1 Goto lbl_loop lbl_done: DetailPrint "Memory Devices: $0" SectionEnd下载隐藏内容，请前往内页查看详情
-
NSIS改变界面字体大小 ;NSIS Modern User Interface ;Multilingual Example Script ;Written by Joost Verburg ;-------------------------------- ;Include Modern UI !include "MUI.nsh" ;-------------------------------- ;General ;Name and file Name "Modern UI Test" OutFile "MultiLanguage.exe" ;Default installation folder InstallDir "$PROGRAMFILES\Modern UI Test" ;Get installation folder from registry if available InstallDirRegKey HKCU "Software\Modern UI Test" "" ;-------------------------------- ;Interface Settings !define MUI_ABORTWARNING ;-------------------------------- ;Language Selection Dialog Settings ;Remember the installer language !define MUI_LANGDLL_REGISTRY_ROOT "HKCU" !define MUI_LANGDLL_REGISTRY_KEY "Software\Modern UI Test" !define MUI_LANGDLL_REGISTRY_VALUENAME "Installer Language" ;-------------------------------- ;Pages !define MUI_PAGE_CUSTOMFUNCTION_SHOW ChangeMainFont !insertmacro MUI_PAGE_LICENSE $(MUILicense) !define MUI_PAGE_CUSTOMFUNCTION_SHOW ChangeFont2 !insertmacro MUI_PAGE_COMPONENTS !define MUI_PAGE_CUSTOMFUNCTION_SHOW ChangeFont !insertmacro MUI_PAGE_DIRECTORY !insertmacro MUI_PAGE_INSTFILES !insertmacro MUI_UNPAGE_CONFIRM !insertmacro MUI_UNPAGE_INSTFILES ;-------------------------------- ;Languages !insertmacro MUI_LANGUAGE "English" # first language is the default language !insertmacro MUI_LANGUAGE "SimpChinese" !insertmacro MUI_LANGUAGE "TradChinese" ;-------------------------------- ;License Language String LicenseLangString MUILicense ${LANG_ENGLISH} "${NSISDIR}\Docs\Modern UI\License.txt" LicenseLangString MUILicense ${LANG_SIMPCHINESE} "${NSISDIR}\Docs\Modern UI\License.txt" LicenseLangString MUILicense ${LANG_TRADCHINESE} "${NSISDIR}\Docs\Modern UI\License.txt" ;-------------------------------- ;Reserve Files ;These files should be inserted before other files in the data block ;Keep these lines before any File command ;Only for solid compression (by default, solid compression is enabled for BZIP2 and LZMA) !insertmacro MUI_RESERVEFILE_LANGDLL ;-------------------------------- ;Installer Sections Section "Dummy Section" SecDummy SetOutPath "$INSTDIR" ;ADD YOUR OWN FILES HERE... ;Store installation folder WriteRegStr HKCU "Software\Modern UI Test" "" $INSTDIR ;Create uninstaller WriteUninstaller "$INSTDIR\Uninstall.exe" SectionEnd ;-------------------------------- ;Installer Functions Function .onInit !insertmacro MUI_LANGDLL_DISPLAY FunctionEnd ;-------------------------------- ;Descriptions ;USE A LANGUAGE STRING IF YOU WANT YOUR DESCRIPTIONS TO BE LANGAUGE SPECIFIC ;Assign descriptions to sections !insertmacro MUI_FUNCTION_DESCRIPTION_BEGIN !insertmacro MUI_DESCRIPTION_TEXT ${SecDummy} "A test section." !insertmacro MUI_FUNCTION_DESCRIPTION_END ;-------------------------------- ;Uninstaller Section Section "Uninstall" ;ADD YOUR OWN FILES HERE... Delete "$INSTDIR\Uninstall.exe" RMDir "$INSTDIR" DeleteRegKey /ifempty HKCU "Software\Modern UI Test" SectionEnd ;-------------------------------- ;Uninstaller Functions Function un.onInit !insertmacro MUI_UNGETLANGUAGE FunctionEnd Function ChangeFont FindWindow $0 "#32770" "" $HWNDPARENT ;$0 保存主窗口句柄 GetDlgItem $R0 $0 1001 CreateFont $R1 "宋体" 9 0 ;浏览按钮字体 SendMessage $R0 ${WM_SETFONT} $R1 0 GetDlgItem $R0 $0 1006 CreateFont $R1 "宋体" 15 0 ;安装目录选择页面 字体 SendMessage $R0 ${WM_SETFONT} $R1 0 FunctionEnd Function ChangeFont2 FindWindow $5 "#32770" "" $HWNDPARENT GetDlgItem $R5 $5 1032 CreateFont $R2 "宋体" 11 0 ;组件选择名称字体 SendMessage $R5 ${WM_SETFONT} $R2 0 GetDlgItem $R5 $5 1042 SendMessage $R5 ${WM_SETFONT} $R2 0 FunctionEnd Function ChangeMainFont FindWindow $2 "#32770" "" $HWNDPARENT CreateFont $R2 "宋体" 104 0 GetDlgItem $R5 $2 1 SendMessage $R5 ${WM_SETFONT} $R2 0 GetDlgItem $R6 $2 2 SendMessage $R6 ${WM_SETFONT} $R2 0 GetDlgItem $R6 $2 3 SendMessage $R6 ${WM_SETFONT} $R2 0 FunctionEnd
