Windows使用AutoHotKey解决鼠标键连击现象（解决鼠标连击、单击变双击的故障）

注：罗技鼠标，使用久了之后会出现连击现象，如果刚好过保了，可以考虑使用软件方案解决连击现象：

以下是示例AutoHotKey脚本，实现了调用XButton1用于关闭窗口（以及Win+W，XButton2也导向关闭窗口，关闭窗口使用了函数Close），其中解决罗技鼠标侧键1（XButton1）所出现的连击现象.

; 可以使用命令#CommentFlag //将注释符; 换为双斜杠
;^ Ctrl
;! Alt
;+ Shift
;# Win/** 修饰符
通配符: 即使附加的修饰键被按住也能激发热键. 这常与 重映射 按键或按钮组合使用.
~ 修饰符
激发热键时，不会屏蔽（被操作系统隐藏）热键中按键原有的功能。
$ 修饰符
通常只在脚本使用 Send 命令发送包含了热键自身的按键时才需要使用此符号, 此时可以避免触发它自己.
$ 前缀强制使用 键盘钩子 来实现此热键, 作为一个副作用这样避免了 Send 命令触发它自己.
$ 前缀相当于在此热键定义之前的某个位置指定了 #UseHook。*/$^w::Close()
return#w::Close()
returnXButton1::Close()
returnXButton2::Close()
returnClose()
{; WinGetClass, class, A; MsgBox, The active window's class is "%class%".; WinGetTitle, Title, A; MsgBox, The active window is "%Title%".;微信IfWinActive, ahk_class WeChatMainWndForPC{WinMinimizereturn};企业微信IfWinActive, ahk_class WeWorkWindow{WinMinimizereturn};资源管理器IfWinActive, ahk_class CabinetWClass{WinClosereturn};.chm HelpIfWinActive, ahk_class HH Parent{WinClosereturn}SetTitleMatchMode, RegEx; Outlook 主窗口IfWinActive, .+Outlook$ ahk_class rctrl_renwnd32{WinMinimizereturn}SetTitleMatchMode, RegEx; SetTitleMatchMode, slow; Outlook 邮件窗口 .+邮件.*IfWinActive, .+(?!Outlook$).* ahk_class rctrl_renwnd32{WinClosereturn}; SetTitleMatchMode, 1; SetTitleMatchMode Fast; 防止出现鼠标连击现象    if (A_PriorHotkey == "XButton1" && A_ThisHotkey == "XButton1" && A_TimeSincePriorHotkey<200){; Send ^w    ; 防止出现鼠标连击现象，这里要空操作！; MsgBox, % "AAA" . A_ThisHotkey . "bbb" . A_TimeSinceThisHotkey}else{Send ^w}
}

--------分割符--------

代码使用XButton1来关闭窗口，关闭窗口使用Close()函数，也即XButton1::Close()。

关键代码：

if (A_PriorHotkey == "XButton1" && A_ThisHotkey == "XButton1" && A_TimeSincePriorHotkey< 200)

关键代码解释如下：A_PriorHotkey代表上一次的按键，A_ThisHotkey代表本次的按键，A_TimeSincePriorHotkey代表2次按键的间隔时间（毫秒），代码含义：如果上一次按键和本次按键均为XButton1，且2次间隔小于200，则{}代表空操作（分号注释代码），否则，将再次发送^w关闭窗口。注意，为了防止死循环调用，$^w::Close()的$代表仅键盘真正的按键^w也即Ctrl+W可以触发Close()函数。否则，本函数只发送^w也即Ctrl+W且不再循环触发Close函数。

实际应用情况中，根据鼠标连击的间隔快慢，可以将200设置为你想要的合适的值。

也可以将代码中，最后部分的 Send ^w 改为 Send XButton1，这样，也可以使XButton1避免重复发送（屏蔽了第2次的发送）。本次案例，精减后的代码【仅针对XButton1】：

; 本代码用于阻止XButton1（侧按键1）出现的连击现象; $ 前缀强制使用 键盘钩子 来实现此热键, 作为一个副作用这样避免了 Send 命令触发它自己
$XButton1::DoXButton1()
returnDoXButton1()
{; 防止出现鼠标连击现象    if (A_PriorHotkey == "XButton1" && A_ThisHotkey == "XButton1" && A_TimeSincePriorHotkey<200){}else{Send XButton1}
}