Fn按键失灵后的软件替代方案

时间:2024-03-02 18:16:33

环境: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,速度快多了。也就是目前可用的版本了

 

延伸思考

  1. wmi可以监听进程的创建、退出消息。这个可以做启动客户端后,自动启动后台服务、停止服务的功能,而优化电脑的性能

  2. autohotkey可以根据窗口的标题来执行动作,那么可以去掉win7桌面的删除文件时的确认窗口