Num Lock小数字键盘灯工具 CoolAutoNum 1.0 发布！

444742627 · 发表于 2021-9-5 21:38:54

一个自动判断是否开启Num Lock小数字键盘灯的工具，将本工具加入PE中并设置为自动运行时，本工具会在PE启动时，判断当前电脑是笔记本，还是台式机，若为笔记本，则关闭Num Lock灯；若为台式机，则开启Num Lock灯。
QQ图片20210905213835.png

CoolAutoNum.7z (11.58 KB, 下载次数: 201)

Angel呆呆 · 发表于 2021-9-5 22:00:00

顶贴

ku588 · 发表于 2021-9-5 22:06:34

本帖最后由 ku588 于 2021-9-5 22:07 编辑

支持下，如果测试没缺陷的话应该是个还不错的工具

叮叮当当 · 发表于 2021-9-6 05:20:49

感谢分享

狼人72105 · 发表于 2021-9-6 08:17:08

顶一下居士，不错的好工具。。。

2011wolfsina · 发表于 2021-9-6 08:20:43

好像收藏过这样的工具。

smalldimple · 发表于 2021-9-6 09:03:02

正好我的无线键盘看不到灯状态，要是同时显示大小写就好了

smalldimple · 发表于 2021-9-6 09:03:59

在我的win10上运行后没有任何显示呢？

2012zhd · 发表于 2021-9-6 09:23:50

好工具，感谢。

444742627 · 发表于 2021-9-6 10:37:13

smalldimple 发表于 2021-9-6 09:03
在我的win10上运行后没有任何显示呢？

只是后台开灯关灯，没有任何显示的，如果你是台式机，把Num Lock灯关了，运行软件，这是灯会亮。

2012andyle113 · 发表于 2021-9-6 11:47:37

我这10下面点了，没有任何反应，也没看见什么进程

444742627 · 发表于 2021-9-6 12:20:08

2012andyle113 发表于 2021-9-6 11:47
我这10下面点了，没有任何反应，也没看见什么进程

开灯或关灯后，自动结束，你看不到的

鸡腿姑爷 · 发表于 2021-9-6 12:24:39

有点意思的小工具

ku588 · 发表于 2021-9-6 13:19:18

本帖最后由 ku588 于 2021-9-6 13:25 编辑

如果用在PE的话可以用这个批处理试试：用在正常系统需要pecmd！
补充说明：尚未在PE下验证是否通用，有兴趣的朋友可以一试！

@echo off
for /f "tokens=2 delims=={}" %%a in ('wmic PATH Win32_SystemEnclosure get ChassisTypes /value') do (
if %%a==3 (
      goto Desktop
) else (
      if %%a==4 (
         goto Desktop
      ) else (
         if %%a==8 (
            goto NoteBook
         ) else (
            if %%a==9 (
                  goto NoteBook
            ) else (
                  if %%a==10 (
                     goto NoteBook
                  )
            )
         )
      )
)
)
:Desktop
echo 当前电脑为台式机
pecmd NUMK 1
goto End
:NoteBook
echo 当前电脑为笔记本电脑
pecmd NUMK 0
goto End
:End

444742627 · 发表于 2021-9-6 13:43:13

ku588 发表于 2021-9-6 13:19
如果用在PE的话可以用这个批处理试试：用在正常系统需要pecmd！
补充说明：尚未在PE下验证是否通用，有兴 ...

一般PE下没有WMI组件哦！集成WMI会多出几十兆

坏坏小生 · 发表于 2021-9-6 13:47:17

我也来一个,源码公开

Function FF_WINMAIN(ByVal hInstance As HINSTANCE) As Long '程序入口函数
Dim a As SYSTEM_POWER_STATUS
   GetSystemPowerStatus(@a)
if a.BatteryFlag = 128 Or a.BatteryFlag = 255 Then
   '是台式机,打开键灯
   SetLight(VK_NUMLOCK ,True )
Else
   '是笔记本,关闭键盘灯
   SetLight(VK_NUMLOCK ,False)
End if
Function = True
End Function
Sub SetLight(i as Long ,bState As BOOL)
Dim keyState(256) As UByte
GetKeyboardState(@keyState(0))
if ((bState And Not (keyState(i) And 1)) Or (Not bState And (keyState(i) And 1))) Then
   keybd_event(i ,&H45 ,KEYEVENTF_EXTENDEDKEY Or 0 ,0)
   keybd_event(i ,&H45 ,KEYEVENTF_EXTENDEDKEY Or KEYEVENTF_KEYUP ,0)
End if
End Sub

欢迎在PE下测试,该程序为32位EXE

小键盘灯.7z (10.51 KB, 下载次数: 37)

444742627 · 发表于 2021-9-6 13:51:04

坏坏小生发表于 2021-9-6 13:47
我也来一个,源码公开

Function FF_WINMAIN(ByVal hInstance As HINSTANCE) As Long '程序入口函数

我就是用的这个API ，检测有没有电池来判断的。估计电池拔了的笔记本是被识别为台式机！

ku588 · 发表于 2021-9-6 15:57:32

444742627 发表于 2021-9-6 13:43
一般PE下没有WMI组件哦！集成WMI会多出几十兆

这个说的倒是，如果pecmd有内置此功能，那PE下就没必要再单独搞这样的工具了

444742627 · 发表于 2021-9-6 21:02:47

ku588 发表于 2021-9-6 15:57
这个说的倒是，如果pecmd有内置此功能，那PE下就没必要再单独搞这样的工具了

PECMD能解决，我就不会在这个上面花时间了，写这个工具，我也是在自己的PE里遇到了这样的问题，没有解决，才自己写的。

2011wolfsina · 发表于 2021-9-6 23:43:46

之前收藏的，好像也不错。

AutoNumLock.zip (1.91 KB, 下载次数: 55)

dszsdyx · 发表于 2021-9-7 03:50:29

这个工具几乎能检测键盘有没有损坏。

dafs · 发表于 2021-9-10 09:43:07

都是很好的工具谢谢各位

乾坤大地 · 发表于 2021-10-9 10:58:47

最好是根据笔记本触模屏来判断有则是笔记本，没有则是台式机

liuzhaoyzz · 发表于 2021-10-9 11:23:29

目前的这些工具，不能完美地解决笔记本带小键盘的这种类型。
需要的效果是，带右侧小键盘的笔记本，运行之后，Numlock亮起来。

andy168 · 发表于 2021-12-25 21:01:42

不错的软件 14寸笔记本数字键盘的福音

zyy · 发表于 2021-12-27 23:00:54

谢谢分享

bhdc · 发表于 2021-12-28 17:16:02

64位有吗？

zhangzan30 · 发表于 2022-1-25 14:24:03

威利古德

winterhope · 发表于 2022-3-31 07:10:26

给力，谢谢

chairmansu · 发表于 2022-6-11 23:37:10

感謝分享

		自动登录	找回密码
密码			注册

[原创] Num Lock小数字键盘灯工具 CoolAutoNum 1.0 发布！

评分

点评

点评

点评

点评

点评

点评

点评