检索TrayIcon对应的程序，并激活

为QQ激活，自定义热键win+q，实现代码如下：（注意win10下面 "QQ.exe"区分大小写才可以）

#q::
o:=TrayIcon_GetInfo("QQ.exe")
Loop,% o.MaxIndex()
{WinShow % "QQ ahk_class TXGuiFoundation ahk_pid " o[A_Index].pidWinActivate % "QQ ahk_class TXGuiFoundation ahk_pid " o[A_Index].pid
}
return

单击某个Tray icon图标

无需鼠标即可单击微信托盘图标，激活当前消息窗口，调用示范：

TrayIcon_Button("WeChat.exe", "L")

为读取微信新消息定义热键win+z，实现代码如下：

#z::
TrayIcon_Button("WeChat.exe", "L")
return

双击某个Tray icon图标

无需鼠标即可双击Everything托盘图标，激活Everything窗口，调用示范：

TrayIcon_Button("Everything.exe", "L",1)

双击Outlook托盘图标，激活Outlook，调用示范：

TrayIcon_Button("OUTLOOK.EXE", "L",1)

右击某个Tray icon图标，再用↑或↓键来定位菜单项，发送{Enter}确认

;{down 2} 就是向托盘图标右键菜单，发送下方向键↓ ,发送2次就是定位第2项，是几就是第几项。
;{up 1}   发送上方向键↑一次，一般是定位到最后1项TrayIcon_Button("Everything.exe", "R")
send {down 2}
send {enter}
return

库文件TrayIcon.ahk源码如下：

; ----------------------------------------------------------------------------------------------------------------------
; Name ..........: TrayIcon library
; Description ...: Provide some useful functions to deal with Tray icons.
; AHK Version ...: AHK_L 1.1.22.02 x32/64 Unicode
; Code from .....: Sean (http://www.autohotkey.com/forum/viewtopic.php?t=17314)
; Author ........: Cyruz (http://ciroprincipe.info) (http://ahkscript.org/boards/viewtopic.php?f=6&t=1229)
; Mod from ......: Fanatic Guru - Cyruz
; License .......: WTFPL - http://www.wtfpl.net/txt/copying/
; Version Date ..: 2019.03.12
; Upd.20160120 ..: Fanatic Guru - Went through all the data types in the DLL and NumGet and matched them up to MSDN
; ...............:                which fixed idCmd.
; Upd.20160308 ..: Fanatic Guru - Fix for Windows 10 NotifyIconOverflowWindow.
; Upd.20180313 ..: Fanatic Guru - Fix problem with "VirtualFreeEx" pointed out by nnnik.
; Upd.20180313 ..: Fanatic Guru - Additional fix for previous Windows 10 NotifyIconOverflowWindow fix breaking non
; ...............:                hidden icons.
; Upd.20190312 ..: Cyruz        - Added TrayIcon_Set, code merged and refactored.
; ----------------------------------------------------------------------------------------------------------------------; ----------------------------------------------------------------------------------------------------------------------
; Function ......: TrayIcon_GetInfo
; Description ...: Get a series of useful information about tray icons.
; Parameters ....: sExeName  - The exe for which we are searching the tray icon data. Leave it empty to receive data for
; ...............:             all tray icons.
; Return ........: oTrayInfo - An array of objects containing tray icons data. Any entry is structured like this:
; ...............:             oTrayInfo[A_Index].idx     - 0 based tray icon index.
; ...............:             oTrayInfo[A_Index].idcmd   - Command identifier associated with the button.
; ...............:             oTrayInfo[A_Index].pid     - Process ID.
; ...............:             oTrayInfo[A_Index].uid     - Application defined identifier for the icon.
; ...............:             oTrayInfo[A_Index].msgid   - Application defined callback message.
; ...............:             oTrayInfo[A_Index].hicon   - Handle to the tray icon.
; ...............:             oTrayInfo[A_Index].hwnd    - Window handle.
; ...............:             oTrayInfo[A_Index].class   - Window class.
; ...............:             oTrayInfo[A_Index].process - Process executable.
; ...............:             oTrayInfo[A_Index].tray    - Tray Type (Shell_TrayWnd or NotifyIconOverflowWindow).
; ...............:             oTrayInfo[A_Index].tooltip - Tray icon tooltip.
; Info ..........: TB_BUTTONCOUNT message - http://goo.gl/DVxpsg
; ...............: TB_GETBUTTON message   - http://goo.gl/2oiOsl
; ...............: TBBUTTON structure     - http://goo.gl/EIE21Z
; ----------------------------------------------------------------------------------------------------------------------TrayIcon_GetInfo(sExeName := "")
{d := A_DetectHiddenWindowsDetectHiddenWindows, OnoTrayInfo := []For key,sTray in ["Shell_TrayWnd", "NotifyIconOverflowWindow"]{idxTB := TrayIcon_GetTrayBar(sTray)WinGet, pidTaskbar, PID, ahk_class %sTray%hProc := DllCall("OpenProcess",    UInt,0x38, Int,0, UInt,pidTaskbar)pRB   := DllCall("VirtualAllocEx", Ptr,hProc, Ptr,0, UPtr,20, UInt,0x1000, UInt,0x04)szBtn := VarSetCapacity(btn, (A_Is64bitOS ? 32 : 20), 0)szNfo := VarSetCapacity(nfo, (A_Is64bitOS ? 32 : 24), 0)szTip := VarSetCapacity(tip, 128 * 2, 0); TB_BUTTONCOUNT = 0x0418SendMessage, 0x0418, 0, 0, ToolbarWindow32%idxTB%, ahk_class %sTray%Loop, %ErrorLevel%{; TB_GETBUTTON 0x0417SendMessage, 0x0417, A_Index-1, pRB, ToolbarWindow32%idxTB%, ahk_class %sTray%DllCall("ReadProcessMemory", Ptr,hProc, Ptr,pRB, Ptr,&btn, UPtr,szBtn, UPtr,0)iBitmap := NumGet(btn, 0, "Int")idCmd   := NumGet(btn, 4, "Int")fsState := NumGet(btn, 8, "UChar")fsStyle := NumGet(btn, 9, "UChar")dwData  := NumGet(btn, (A_Is64bitOS ? 16 : 12), "UPtr")iString := NumGet(btn, (A_Is64bitOS ? 24 : 16), "Ptr")DllCall("ReadProcessMemory", Ptr,hProc, Ptr,dwData, Ptr,&nfo, UPtr,szNfo, UPtr,0)hWnd  := NumGet(nfo, 0, "Ptr")uId   := NumGet(nfo, (A_Is64bitOS ?  8 :  4), "UInt")msgId := NumGet(nfo, (A_Is64bitOS ? 12 :  8), "UPtr")hIcon := NumGet(nfo, (A_Is64bitOS ? 24 : 20), "Ptr")WinGet, nPid, PID, ahk_id %hWnd%WinGet, sProcess, ProcessName, ahk_id %hWnd%WinGetClass, sClass, ahk_id %hWnd%If ( !sExeName || sExeName == sProcess || sExeName == nPid ){DllCall("ReadProcessMemory", Ptr,hProc, Ptr,iString, Ptr,&tip, UPtr,szTip, UPtr,0)oTrayInfo.Push({ "idx"     : A_Index-1, "idcmd"   : idCmd, "pid"     : nPid, "uid"     : uId, "msgid"   : msgId, "hicon"   : hIcon, "hwnd"    : hWnd, "class"   : sClass, "process" : sProcess, "tooltip" : StrGet(&tip, "UTF-16"), "tray"    : sTray })}}DllCall("VirtualFreeEx", Ptr,hProc, Ptr,pRB, UPtr,0, UInt,0x8000)DllCall("CloseHandle",   Ptr,hProc)}DetectHiddenWindows, %d%Return oTrayInfo
}; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_Hide
; Description ..: Hide or unhide a tray icon.
; Parameters ...: idCmd - Command identifier associated with the button.
; ..............: sTray - Place where to find the icon ("Shell_TrayWnd" or "NotifyIconOverflowWindow").
; ..............: bHide - True for hide, False for unhide.
; Info .........: TB_HIDEBUTTON message - http://goo.gl/oelsAa
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_Hide(idCmd, sTray:="Shell_TrayWnd", bHide:=True)
{d := A_DetectHiddenWindowsDetectHiddenWindows, OnidxTB := TrayIcon_GetTrayBar()SendMessage, 0x0404, idCmd, bHide, ToolbarWindow32%idxTB%, ahk_class %sTray% ; TB_HIDEBUTTONSendMessage, 0x001A, 0, 0, , ahk_class %sTray%DetectHiddenWindows, %d%
}; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_Delete
; Description ..: Delete a tray icon.
; Parameters ...: idx   - 0 based tray icon index.
; ..............: sTray - Place where to find the icon ("Shell_TrayWnd" or "NotifyIconOverflowWindow").
; Info .........: TB_DELETEBUTTON message - http://goo.gl/L0pY4R
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_Delete(idx, sTray:="Shell_TrayWnd")
{d := A_DetectHiddenWindowsDetectHiddenWindows, OnidxTB := TrayIcon_GetTrayBar()SendMessage, 0x0416, idx, 0, ToolbarWindow32%idxTB%, ahk_class %sTrayPlace% ; TB_DELETEBUTTON = 0x0416SendMessage, 0x001A, 0, 0, , ahk_class %sTrayPlace%DetectHiddenWindows, %d%
}; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_Remove
; Description ..: Remove a Tray icon. It should be more reliable than TrayIcon_Delete.
; Parameters ...: hWnd - Window handle.
; ..............: uId  - Application defined identifier for the icon.
; Info .........: NOTIFYICONDATA structure  - https://goo.gl/1Xuw5r
; ..............: Shell_NotifyIcon function - https://goo.gl/tTSSBM
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_Remove(hWnd, uId)
{VarSetCapacity(NID, szNID := ((A_IsUnicode ? 2 : 1) * 384 + A_PtrSize*5 + 40),0)NumPut( szNID, NID, 0           )NumPut( hWnd,  NID, A_PtrSize   )NumPut( uId,   NID, A_PtrSize*2 )Return DllCall("Shell32.dll\Shell_NotifyIcon", UInt,0x2, UInt,&NID)
}; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_Move
; Description ..: Move a tray icon.
; Parameters ...: idxOld - 0 based index of the tray icon to move.
; ..............: idxNew - 0 based index where to move the tray icon.
; ..............: sTray  - Place where to find the icon ("Shell_TrayWnd" or "NotifyIconOverflowWindow").
; Info .........: TB_MOVEBUTTON message - http://goo.gl/1F6wPw
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_Move(idxOld, idxNew, sTray := "Shell_TrayWnd")
{d := A_DetectHiddenWindowsDetectHiddenWindows, OnidxTB := TrayIcon_GetTrayBar()SendMessage, 0x452, idxOld, idxNew, ToolbarWindow32%idxTB%, ahk_class %sTrayPlace% ; TB_MOVEBUTTON = 0x452DetectHiddenWindows, %d%
}; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_Set
; Description ..: Modify icon with the given index for the given window.
; Parameters ...: hWnd       - Window handle.
; ..............: uId        - Application defined identifier for the icon.
; ..............: hIcon      - Handle to the tray icon.
; ..............: hIconSmall - Handle to the small icon, for window menubar. Optional.
; ..............: hIconBig   - Handle to the big icon, for taskbar. Optional.
; Return .......: True on success, false on failure.
; Info .........: NOTIFYICONDATA structure  - https://goo.gl/1Xuw5r
; ..............: Shell_NotifyIcon function - https://goo.gl/tTSSBM
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_Set(hWnd, uId, hIcon, hIconSmall:=0, hIconBig:=0)
{d := A_DetectHiddenWindowsDetectHiddenWindows, On; WM_SETICON = 0x0080If ( hIconSmall ) SendMessage, 0x0080, 0, hIconSmall,, ahk_id %hWnd%If ( hIconBig )SendMessage, 0x0080, 1, hIconBig,, ahk_id %hWnd%DetectHiddenWindows, %d%VarSetCapacity(NID, szNID := ((A_IsUnicode ? 2 : 1) * 384 + A_PtrSize*5 + 40),0)NumPut( szNID, NID, 0                           )NumPut( hWnd,  NID, (A_PtrSize == 4) ? 4   : 8  )NumPut( uId,   NID, (A_PtrSize == 4) ? 8   : 16 )NumPut( 2,     NID, (A_PtrSize == 4) ? 12  : 20 )NumPut( hIcon, NID, (A_PtrSize == 4) ? 20  : 32 ); NIM_MODIFY := 0x1Return DllCall("Shell32.dll\Shell_NotifyIcon", UInt,0x1, Ptr,&NID)
}; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_GetTrayBar
; Description ..: Get the tray icon handle.
; Parameters ...: sTray - Traybar to retrieve.
; Return .......: Tray icon handle.
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_GetTrayBar(sTray:="Shell_TrayWnd")
{d := A_DetectHiddenWindowsDetectHiddenWindows, OnWinGet, ControlList, ControlList, ahk_class %sTray%RegExMatch(ControlList, "(?<=ToolbarWindow32)\d+(?!.*ToolbarWindow32)", nTB)Loop, %nTB%{ControlGet, hWnd, hWnd,, ToolbarWindow32%A_Index%, ahk_class %sTray%hParent := DllCall( "GetParent", Ptr, hWnd )WinGetClass, sClass, ahk_id %hParent%If !(sClass == "SysPager" || sClass == "NotifyIconOverflowWindow" )ContinueidxTB := A_IndexBreak}DetectHiddenWindows, %d%Return idxTB
}; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_GetHotItem
; Description ..: Get the index of tray's hot item.
; Return .......: Index of tray's hot item.
; Info .........: TB_GETHOTITEM message - http://goo.gl/g70qO2
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_GetHotItem()
{idxTB := TrayIcon_GetTrayBar()SendMessage, 0x0447, 0, 0, ToolbarWindow32%idxTB%, ahk_class Shell_TrayWnd ; TB_GETHOTITEM = 0x0447Return ErrorLevel << 32 >> 32
}; ----------------------------------------------------------------------------------------------------------------------
; Function .....: TrayIcon_Button
; Description ..: Simulate mouse button click on a tray icon.
; Parameters ...: sExeName - Executable Process Name of tray icon.
; ..............: sButton  - Mouse button to simulate (L, M, R).
; ..............: bDouble  - True to double click, false to single click.
; ..............: nIdx     - Index of tray icon to click if more than one match.
; ----------------------------------------------------------------------------------------------------------------------
TrayIcon_Button(sExeName, sButton:="L", bDouble:=False, nIdx:=1)
{d := A_DetectHiddenWindowsDetectHiddenWindows, OnWM_MOUSEMOVE      = 0x0200WM_LBUTTONDOWN    = 0x0201WM_LBUTTONUP      = 0x0202WM_LBUTTONDBLCLK  = 0x0203WM_RBUTTONDOWN    = 0x0204WM_RBUTTONUP      = 0x0205WM_RBUTTONDBLCLK  = 0x0206WM_MBUTTONDOWN    = 0x0207WM_MBUTTONUP      = 0x0208WM_MBUTTONDBLCLK  = 0x0209sButton := "WM_" sButton "BUTTON"oIcons  := TrayIcon_GetInfo(sExeName)If ( bDouble )PostMessage, oIcons[nIdx].msgid, oIcons[nIdx].uid, %sButton%DBLCLK,, % "ahk_id " oIcons[nIdx].hwndElse{PostMessage, oIcons[nIdx].msgid, oIcons[nIdx].uid, %sButton%DOWN,, % "ahk_id " oIcons[nIdx].hwndPostMessage, oIcons[nIdx].msgid, oIcons[nIdx].uid, %sButton%UP,, % "ahk_id " oIcons[nIdx].hwnd}DetectHiddenWindows, %d%Return
}

===========以下是早期版本，win10上貌似不能用了====================

转自：http://leetschau.github.io/blog/2011/02/21/162416/ 点击打开链接修改了一些错误，并使之支持64位系统。

;~ 激活托盘区程序的ahk脚本
;2017年1月6日21:27:48 Quant已经修改为之处64位系统
;~ http://leetschau.github.io/blog/2011/02/21/162416/
;~ FEB 21ST, 2011 4:24 PM
;~ 下面的脚本实现了激活系统托盘区（system tray）Outlook程序的效果（Windows XP）,第一行是不在托盘区出现一个autohotkey的图标,这样做的好处是显得比较酷,缺点是如果想中断这个脚本,就只能在任务管理器里关进程（Autohotkey.exe）了。第二行是运行脚本的快捷键（这里是Win键+"]"键）,后面是脚本的具体内容,大体意思是首先用TrayIcons函数找到进程"OUTLOOK.EXE"的各种参数,然后用PostMessage方法向这个进程发指令,令其窗口显示出来,TrayIcons函数中涉及了很多Windows API,俺就不懂了,好用就行。;~ 使用方法：首先要安装Autohotkey_L v1.0.92.02,将下面的代码保存为一个 UTF-8格式 编码的文本文件,扩展名为ahk,双击运行之。;~ NoTrayIcon]::DetectHiddenWindows, On;~ Info := TrayIcons("OUTLOOK.EXE") ; 激活Outlook,这个名字是任务管理器的"进程"里程序对应的进程名称
;~ Info := TrayIcons("qq.exe") ;
Info := TrayIcons("Everything64.exe") ;
MsgBox %Info%
StringSplit, TrayInfo, Info,|
WM_LBUTTONDBLCLK= 0x0203
PostMessage, TrayInfo1,TrayInfo2, 0x0203,, ahk_id %TrayInfo3%
; 这句话实现了激活托盘区程序return; Found and abused from; http://www.autohotkey.com/forum/topic17314.html; thx, Sean … GREAT WORK!TrayIcons(sExeName ="")
{
WinGet, pidTaskbar, PID, ahk_class Shell_TrayWnd
hProc := DllCall("OpenProcess", "Uint", 0x38, "int", 0, "Uint", pidTaskbar)
pRB := DllCall("VirtualAllocEx", "Uint", hProc, "Uint", 0, "Uint", 20, "Uint", 0x1000, "Uint", 0x4)
;~ VarSetCapacity(btn, 20)
;~ VarSetCapacity(nfo, 24)VarSetCapacity(btn,32,0), VarSetCapacity(nfo,32,0)
VarSetCapacity(sTooltip, 128)
VarSetCapacity(wTooltip, 128 * 2)
SendMessage, 0x418, 0, 0, ToolbarWindow321, ahk_class Shell_TrayWnd
Loop, %ErrorLevel%
{
SendMessage, 0x417, A_Index - 1, pRB, ToolbarWindow321, ahk_class Shell_TrayWnd
DllCall("ReadProcessMemory", "Uint", hProc, "Uint", pRB, "Uint", &btn, "Uint", 20, "Uint", 0)
iBitmap := NumGet(btn, 0), idn := NumGet(btn, 4), Statyle := NumGet(btn, 8)
;~ dwData := NumGet(btn,12), iString := NumGet(btn,16)If  dwData  := NumGet(btn,12)iString   := NumGet(btn,16)Else  dwData  := NumGet(btn,16,"int64"), iString:=NumGet(btn,24,"int64")
DllCall("ReadProcessMemory", "Uint", hProc, "Uint", dwData, "Uint", &nfo, "Uint", 24, "Uint", 0)If  NumGet(btn,12)hWnd  := NumGet(nfo, 0), uID := NumGet(nfo, 4), nMsg    := NumGet(nfo, 8), hIcon   := NumGet(nfo,20)Else  hWnd    := NumGet(nfo, 0,"int64"), uID:=NumGet(nfo, 8), nMsg:=NumGet(nfo,12);~ hWnd := NumGet(nfo, 0), uID := NumGet(nfo, 4)
;~ nMsg := NumGet(nfo, 8)
WinGet, pid, PID, ahk_id %hWnd%
WinGet, sProcess, ProcessName, ahk_id %hWnd%
WinGetClass, sClass, ahk_id %hWnd%
If !sExeName || (sExeName = sProcess) || (sExeName = pid)
{
DllCall("ReadProcessMemory", "Uint", hProc, "Uint", iString, "Uint", &wTooltip, "Uint", 128 * 2, "Uint", 0)
DllCall("WideCharToMultiByte", "Uint", 0, "Uint", 0, "str", wTooltip, "int", -1, "str", sTooltip, "int", 128, "Uint", 0, "Uint", 0)
sTrayIcons .= nMsg "|" uID "|" hWnd}}DllCall("VirtualFreeEx", "Uint", hProc, "Uint", pRB, "Uint", 0, "Uint", 0x8000)
DllCall("CloseHandle", "Uint", hProc)
Return sTrayIcons
}

[AHK]双击托盘区某可见程序图标以激活之(为读取微信新消息定义热键)相关推荐

微信公众号/微信小程序获取用户信息以及推送微信模版消息_MQ
微信公众号/微信小程序获取用户信息以及推送微信模版消息_MQ 一.获取用户信息 1.首先我们需要了解什么是微信用户的OpenID 在关注者与公众号产生消息交互后,公众号可获得关注者的OpenID(加密 ...
微信小程序云开发教程-手把手：获取微信订阅消息的模板ID
本小节,我们将手把手带领大家一起实现第一个接口,获取微信订阅消息的模板ID 通过开发这个接口,我们将学会云函数的基本结构和函数返回值的格式定义. 开发接口前,我们必须先写接口文档.小程序后端的接口文档 ...
[AHK]右键单击托盘中的QQ图标退出QQ
最近再搜集整理手上的一些AutoHotkey脚本,希望能帮到ahker,;函数见http://www.autohotkey.com/forum/topic17314.html&highligh ...
C#WinForm 程序退出后，托盘区的图标不能及时消失
C#WinForm 程序退出后,托盘区的图标不能及时消失问题发现这个问题其实出现在C#的WinForm中,我写了一个退出程序的button.程序退出后,托盘区的图标不能及时消失. 处理方法 pri ...
Windows 10任务栏中托盘区（通知区域）图标怎么缩略成^
1.重启电脑后windows的通知区域就不能缩略了,有些图标还没有,用了这个办法才重新显示.但是图标不能缩略看着很不习惯. Windows 10任务栏中托盘区(通知区域)图标消失的解决方法_Ayka的 ...
qt修改程序图标名称_解决Qt应用程序添加icon图标，修改窗口图标以及添加系统托盘问题...
一.Qt应用程序添加icon图标的方法: 首先,我们需要先准备两个文件,一个是icon图标,另一个是rc文件,我分别命名为"myApp.rc"和"soft.ico&quo ...
计算机上没有系统软件应用软件也一样能使用,2010判断题一般双击桌面上的程序图标可以打开该程序...
一般双击桌面上的程序图标可以打开该程序在Windows中,回收站和剪贴板都是硬盘上的一块区域.B 计算机病毒是指能传染给用户的生物病毒.B 计算机病毒可通过软盘.光盘.网络传播.A Windows允 ...
清除异常关闭进程的任务栏托盘区残留图标
使用TerminateProcess关闭的进程如果生成过托盘图标,这个图标就会停留在右下角的托盘区(因为该进程来不及执行自己的图标清理代码),直到鼠标移上去时才消失.显然这个效果并不理想. 这里我们可 ...
托盘区图标操作（NOTIFYICONDATA）
经常能够看到软件运行后在托盘产生图标 ,其实也就是对结构 NOTIFYICONDATA 的设置再调用Shell_NotifyIcon就能完成 NOTIFYICONDATA notifycd; not ...

[AHK]双击托盘区某可见程序图标以激活之(为读取微信新消息定义热键)

检索TrayIcon对应的程序，并激活

单击某个Tray icon图标

双击某个Tray icon图标

右击某个Tray icon图标，再用↑或↓键来定位菜单项，发送{Enter}确认

[AHK]双击托盘区某可见程序图标以激活之(为读取微信新消息定义热键)相关推荐

最新文章

热门文章