AutoHotKey实现双击Chrome标签位置关闭标签页（ChatGPT辅助编写）

原创已于 2023-06-19 19:30:41 修改 · 2.1k 阅读

1 ·

CC 4.0 BY-SA版权

文章标签：

#chrome

于 2023-03-13 22:18:21 首次发布

该文章提供了一个使用AutoHotkey编写的脚本，允许用户通过双击关闭Chrome浏览器的标签页，避免了误触滚轮导致的弹窗问题。作者基于MaxAlex的解决方案进行了修改，但指出存在一个问题，即在双击缩放浏览器时会意外关闭标签页，期待社区帮助解决。

实现目标：双击关闭Chrome标签页，相较于 MaxAlex 的版本，只保留双击关闭标签，不然滚轮滚多了会弹窗。

共四步
1.安装atuohotkey最新版本
2.新建一个文本文档，更改名字比如为为test.ahk，但是要后缀名为ahk
3.使用记事本或其他文本编辑软件打开test.ahk，在其中输入如下代码。
4.右键test.ahk, 选择使用autohotkey打开。
致谢&参考脚本：本脚本根据 MaxAlex 发表的《Chrome 81 双击关闭标签页终极解决方案》修改，特此感谢。感谢“不停、”提出的此脚本存在的bug：双击放大缩小浏览器的时候，会关闭最近一个标签页。目前我还不知道怎么解决这个问题，欢迎各位帮忙提出debug方案。

;【20230310】双击关闭Chrome标签
#NoEnv
#SingleInstance force

IniRead, doubleclick, settings.ini, option, doubleclick, Check
menu, tray, Standard
return

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

退出:
ExitApp
return

ToggleDoubleClick:
doubleclick := doubleclick = "Check" ? "UnCheck" : "Check"
IniWrite, %doubleclick%, settings.ini, option, doubleclick
return

#IfWinActive ahk_class Chrome_WidgetWin_1

~LButton::
if (doubleclick = "Check" && A_PriorHotkey = "~LButton" && A_TimeSincePriorHotkey < 200) {
WinGetPos, , , w, h, A
MouseGetPos, xpos, ypos
WinGet, Mom, MinMax
if ((ypos > 45 && Mom < 1) || (ypos > 28 && Mom > 0) || ypos < 0)
return
send ^w
}
Return

#IfWinActive

EmptyMem(PID="AHK Rocks") {
pid := (pid = "AHK Rocks") ? DllCall("GetCurrentProcessId") : pid
h := DllCall("OpenProcess", "UInt", 0x001F0FFF, "Int", 0, "Int", pid)
DllCall("SetProcessWorkingSetSize", "UInt", h, "Int", -1, "Int", -1)
DllCall("CloseHandle", "Int", h)
}