#检测默认浏览器
#编写：水晶石
#原理：用FindExecutable函数查找htm关联程序路径与名称，然后分析字串中包含的可执行文件名。
!include "LogicLib.nsh"
XPStyle on
ShowInstDetails show
OutFile "NSIStest.exe"
Name "test"
Section "test"
GetTempFileName $0
Rename $0 $temp\browser.htm
System::Call "Shell32::FindExecutable(t'$temp\browser.htm', i0, t .r1)"
System::Call "Shlwapi::StrStr(tr1, t`IEXPLORE.EXE`)t .r0"
${If} $0 != ""
DetailPrint 'IE为默认浏览器'
${Else}
DetailPrint "IE不是默认浏览器"
${EndIf}
Delete `$temp\browser.htm`
SectionEnd
