这两段代码已经集成收录在AHKEditor编辑器中,这两个热键功能将极大的方便我们平时调试AHK代码

 

热键快速测试AHK代码:

;【Ctrl+D】用于快速测试剪贴板的代码【默认以管理员权限测试】
^d::
s:=Clipboard
IfEqual, s, , Return
FileDelete, %A_Temp%\~ClipboardTest.ahk
FileAppend, % RegExReplace(s,"\R","`r`n"), %A_Temp%\~ClipboardTest.ahk, UTF-8
Run *RunAs "%A_ScriptDir%\AutoHotkey_Setup\AutoHotkeyU64.exe" /restart "%A_Temp%\~ClipboardTest.ahk",, UseErrorLevel
ToolTip 剪贴板脚本已运行!, (A_ScreenWidth//2)-(56*A_ScreenDPI/96), 10*A_ScreenDPI/96
SetTimer SC996, -1500
Return
SC996::ToolTip

 

一键清理其它AHK进程:

;【Alt+X】一键清理其它AHK进程
!x::
需管理员权限启动的清理进程代码=
(LTrim ` %
排除脚本名 := ["kaiji.ahk", "Google剪贴板翻译.ahk"]  ; 此数组可以填写你想排除的AHK脚本名
SetBatchLines -1
DetectHiddenWindows On
WinGet, list, List, ahk_class AutoHotkey
Loop %list% {
  跳过本次 := 0
  if (A_ScriptHwnd=(id:=list%A_Index%))
    Continue
  WinGetTitle, 获取脚本标题, ahk_id %id%
  获取脚本提取 := RegExReplace(获取脚本标题, " - AutoHotkey v[\d.]+$")
  SplitPath, 获取脚本提取, 获取文件名
  For _ in 排除脚本名
    (获取文件名=排除脚本名[A_Index] && 跳过本次 := 1)
  if (跳过本次=0) {
    WinClose, ahk_id %id%
    WinGet, pid, PID, ahk_id %id%
    if WinExist("ahk_id " id)
      Process, Close, %pid%
  }
}
ExitApp
)
FileDelete, %A_Temp%\~ClearingAHKprocess.ahk
FileAppend, %需管理员权限启动的清理进程代码%, %A_Temp%\~ClearingAHKprocess.ahk
Run *RunAs "%A_ScriptDir%\AutoHotkey_Setup\AutoHotkeyU64.exe" /restart "%A_Temp%\~ClearingAHKprocess.ahk",, UseErrorLevel
Tip("其它AHK程序已经退出!")
SetTimer SC997, -1000
Return

Tip(s:="", Period:="") {
  SetTimer %A_ThisFunc%, % s="" ? "Off" : "-" (Period="" ? 1500 : Period)
  ToolTip %s%, , , 17
}
SC997::Send {LWin Up}{RWin Up}
声明:站内资源为整理优化好的代码上传分享与学习研究,如果是开源代码基本都会标明出处,方便大家扩展学习路径。请不要恶意搬运,破坏站长辛苦整理维护的劳动成果。本站为爱好者分享站点,所有内容不作为商业行为。如若本站上传内容侵犯了原著者的合法权益,请联系我们进行删除下架。