Fn按键失灵后的软件替代方案
环境：windows
前言
笔记本的Fn键失灵了，虽然电脑自带了Fn与Ctrl键切换的功能，但为了使用Fn而牺牲左边的Ctrl键，简直不可接受。Fn提供的功能也是我适应白天和晚上不能缺少的功能。
网友们说这种情况可能拆下键盘，清理下金手指就好了，但一来麻烦，二来不一定能好。
实现
要替代Fn的组合键，就要设置快捷键，而windows下设置快捷键最方便的工具莫过于autohotkey了。而且可以发送按键，直接发送Fn+F5不就可以调整亮度了吗，so easy! 分分钟搞定！
然而，现实很残酷！Fn的按键没有相应的编码？！而且抓取不到！且各硬件厂家的实现不一？
好吧，换个思路？能调整屏幕亮度就成！找到可使用wmi来调整屏幕亮度，powershell的代码如下：
::将屏幕的亮度设置为50，最小值为0，最大值为100 (Get-WmiObject -Namespace root/WMI -Class WmiMonitorBrightnessMethods).WmiSetBrightness(1,50) ::获取当前屏幕亮度 (Get-Ciminstance -Namespace root/WMI -ClassName WmiMonitorBrightness).CurrentBrightness
vbscript的代码如下：
' 将屏幕的亮度设置为50，最小值为0，最大值为100
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\wmi")
Set colItems = objWMIService.ExecQuery("Select * from WmiMonitorBrightnessMethods",,48)
For Each objItem in colItems
objItem.WmiSetBrightness(1, 50)
WScript.Echo ""
Next
'获取当前屏幕亮度
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\wmi")
Set colItems = objWMIService.ExecQuery("Select * from WmiMonitorBrightness",,48)
For Each objItem in colItems
WScript.Echo "CurrentBrightness: " & objItem.CurrentBrightness
WScript.Echo ""
Next
转化为Autohotkey后的代码如下：
;设置屏幕亮度
SetBrightNess(iSetBrigthNess)
{
iSetBrigthNess := Min(100, iSetBrigthNess) ;不大于100
iSetBrigthNess := Max(0, iSetBrigthNess) ; 不小于0
strComputer := "."
objWMIService := ComObjGet("winmgmts:\\" . strComputer . "\root\wmi")
colItems := objWMIService.ExecQuery("Select * from WmiMonitorBrightnessMethods", ComObjMissing(), 48)
For objItem in colItems {
objItem.WmiSetBrightness(1, iSetBrigthNess)
}
return iSetBrigthNess
}
;获取屏幕亮度
GetCurBrightNess()
{
strComputer := "."
objWMIService := ComObjGet("winmgmts:\\" . strComputer . "\root\wmi")
colItems := objWMIService.ExecQuery("Select * from WmiMonitorBrightness", ComObjMissing(), 48)
iCurrentBrightness := 0
For objItem in colItems {
;~ MsgBox, % "-----------------------------------"
;~ . "Win32_OperatingSystem instance"
;~ . "-----------------------------------"
;~ . "Caption: " . objItem.CurrentBrightness
iCurrentBrightness := objItem.CurrentBrightness
}
return iCurrentBrightness
}
完整的Autohotkey代码如下：
;Alt+LCtrl+F1 静音
!>^F1::Send {Volume_Mute}
;Alt+LCtrl+F2 降低音量
!>^F2::Send {Volume_Down}
;Alt+LCtrl+F3 增加音量
!>^F3::Send {Volume_Up}
;Alt+LCtrl+Left 上一首
!>^Left::Send {Media_Prev}
;Alt+LCtrl+Down 暂停、播放
!>^Down::Send {Media_Play_Pause}
;Alt+LCtrl+Right 下一首
!>^Right::Send {Media_Next}
;Alt+LCtrl+Up 停止
!>^Up::Send {Media_Stop}
!>^F5::
result := GetCurBrightNess()
--result
;~ MsgBox % "Result: " --result
SetBrightNess(result)
return
;Alt+LCtrl+F6 增加亮度
!>^F6::
result := GetCurBrightNess()
++result
SetBrightNess(result)
return
;Alt+LCtrl+ESC 退出程度
!>^Esc::ExitApp
;获取屏幕亮度
GetCurBrightNess()
{
strComputer := "."
objWMIService := ComObjGet("winmgmts:\\" . strComputer . "\root\wmi")
colItems := objWMIService.ExecQuery("Select * from WmiMonitorBrightness", ComObjMissing(), 48)
iCurrentBrightness := 0
For objItem in colItems {
;~ MsgBox, % "-----------------------------------"
;~ . "Win32_OperatingSystem instance"
;~ . "-----------------------------------"
;~ . "Caption: " . objItem.CurrentBrightness
iCurrentBrightness := objItem.CurrentBrightness
}
return iCurrentBrightness
}
;设置屏幕亮度
SetBrightNess(iSetBrigthNess)
{
iSetBrigthNess := Min(100, iSetBrigthNess) ;不大于100
iSetBrigthNess := Max(0, iSetBrigthNess) ; 不小于0
strComputer := "."
objWMIService := ComObjGet("winmgmts:\\" . strComputer . "\root\wmi")
colItems := objWMIService.ExecQuery("Select * from WmiMonitorBrightnessMethods", ComObjMissing(), 48)
For objItem in colItems {
objItem.WmiSetBrightness(1, iSetBrigthNess)
}
return iSetBrigthNess
}
参考资料：
1. https://docs.microsoft.com/zh-cn/windows/desktop/WmiSdk/calling-a-method 告诉了我在autohotkey中可以使用
"
objItem.WmiSetBrightness(1, iSetBrigthNess)
"来调用WmiSetBtightness()的函数，此前使用别的方式调用，返回了错误信息0x8004102F
2. http://www.yfvb.com/help/wmi/index.htm?page=wmi_error_constants.htm wmi编程手册，中文版，可以先学习下基础知识
3. https://docs.microsoft.com/zh-cn/windows/desktop/WmiSdk/swbemservicesex-put 对工具的帮助不是很大，但有个印象
4. https://docs.microsoft.com/zh-cn/windows/desktop/WmiSdk/creating-a-wmi-script 基础知识，了解了解
5.https://docs.microsoft.com/zh-cn/windows/desktop/WmiSdk/swbemobject 基础知识，了解了解
6.https://blog.csdn.net/ONE_SIX_MIX/article/details/80286421 对本文的帮助非常大，这个是c++的解决方案，但我一来不想安装vs2017,二来还有可以直接发送按键就能实现一部分功能，而这些，在c++中不清楚如何处理，想尽快搞个可用的工具。
7.https://www.jianshu.com/p/41206522387b 对本工具的帮助也非常大，之前只找到了powershell版本的可用代码，在autohotkey中调用powershell,来实现功能，可实际证明，这样太慢了，实在不好用，学习了这个以后直接在脚本中调用wmi，速度快多了。也就是目前可用的版本了
延伸思考
-
wmi可以监听进程的创建、退出消息。这个可以做启动客户端后，自动启动后台服务、停止服务的功能，而优化电脑的性能
-
autohotkey可以根据窗口的标题来执行动作，那么可以去掉win7桌面的删除文件时的确认窗口
