用热键win+字母激活任务栏上的按钮[ahk]
;bug:热键请自行修改，发现按win+d win+l 等和系统热键冲突,可以改成空格键或Capslock键+字母
; File encoding: UTF-8;http://blog.csdn.net/liuyukuan/article/details/8349832AutoHotkey 版本: 1.0.9.1操作系统: Windows XP作者: sunwind <1576157@qq.com>博客: http://blog.csdn.net/liuyukuan脚本说明：Quick task switching with Win+[a,b,...,z]脚本版本： v1.0Timestamp:2012-12-20 14:12:56*/;改版by sunwind：;~ 按win+-显示任务栏上按钮标号;~ 标号是用字母标识;~ 按win+字母 切换;~ 原版：;Quick task switching with Win+[1,2,...,0];Win + 数字键 切换，用 Win - 可能看到任务栏标号，然后再 Win + 数字 切换;http://www.autohotkey.com/forum/viewtopic.php?t=41542&highlight=taskbar+order+switch#SingleInstance#WinActivateForceBuild_hWndArray(26)Loop %g_bundleCount% { sym:=Chr(A_Index+96) Hotkey, #%sym%, %sym% }Returna: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnb: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnc: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnd: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returne: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnf: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returng: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnh: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returni: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnj: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnk: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnl: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnm: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnn: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returno: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnp: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnq: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnr: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returns: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnt: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnu: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnv: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnw: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnx: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returny: n:=Asc(A_ThisLabel)-96 FocusButton(n)Returnz: n:=Asc(A_ThisLabel)-96 FocusButton(n)Return;WIN+- shows button numbers as tooltips.#-::#NumpadSub:: ShowToolTips() SetTimer, RemoveToolTips, -1000ReturnRemoveToolTips: Loop, 12 ToolTip,,,,%A_Index%ReturnShowToolTips() { global g_bundleCount CoordMode, ToolTip, Screen Loop, %g_bundleCount% { ;~ If A_Index < 5 ;~ continue x := g_xs%A_Index% y := g_ys%A_Index% ;~ If A_Index = 10 ;~ text = 0 ;~ Else ;~ text = %A_Index% text:=Chr(A_Index+96) ToolTip, %text%, %x%, %y%, %A_Index% } }Add_hWndToArray(gi, hWnd) { global g_bundleSize%gi% := g_bundleSize%gi% + 1 local wi := g_bundleSize%gi% g_hWnd%gi%_%wi% := hWnd }AddBundle(gi) { global g_bundleSize%gi% := 0 }BundleSize(gi) { global Return g_bundleSize%gi% }Get_hWndFromArray(gi, wi) { global Return g_hWnd%gi%_%wi% }SetButtonTopLeftLoc(gi, x, y) { global g_xs%gi% := x g_ys%gi% := y }Build_hWndArray(maxBundleCount) { global g_bundleCount WinGet,pidTaskbar, PID, ahk_class Shell_TrayWnd hProc := DllCall("OpenProcess", "Uint", 0x38, "int", 0, "Uint", pidTaskbar) pProc := DllCall("VirtualAllocEx", "Uint", hProc, "Uint", 0, "Uint", 32, "Uint", 0x1000, "Uint", 0x4) idxTB := GetTaskSwBar() SendMessage, 0x418, 0, 0, ToolbarWindow32%idxTB%, ahk_class Shell_TrayWnd ; TB_ButtonCount ButtonCount := ErrorLevel g_bundleCount := 0 Loop, %ButtonCount% { SendMessage, 0x417, A_Index-1, pProc, ToolbarWindow32%idxTB%, ahk_class Shell_TrayWnd ; TB_GETButton VarSetCapacity(btn, 32, 0) DllCall("ReadProcessMemory", "Uint", hProc, "Uint", pProc, "Uint", &btn, "Uint", 32, "Uint", 0) idn:= NumGet(btn, 4) Statyle := NumGet(btn, 8, "Char") dwData := NumGet(btn, 12) If Not dwData dwData := NumGet(btn, 16, "int64") DllCall("ReadProcessMemory", "Uint", hProc, "Uint", dwData, "int64P", hWnd:=0, "Uint", NumGet(btn,12) ? 4:8, "Uint", 0) If Not hWnd ; Group Button, indicates the start of a Group { If g_bundleCount >= %maxBundleCount% Break Hidden := Statyle & 0x08 ; TBSTATE_Hidden If Not Hidden { grpCollapsed := true g_bundleCount := g_bundleCount + 1 AddBundle(g_bundleCount) GetTaskbarButtonTopLeft(idn, x, y) SetButtonTopLeftLoc(g_bundleCount, x, y) } Else grpCollapsed := false } Else ; actual window Button { If grpCollapsed { Add_hWndToArray(g_bundleCount, hWnd) } Else { g_bundleCount := g_bundleCount + 1 AddBundle(g_bundleCount) Add_hWndToArray(g_bundleCount, hWnd) GetTaskbarButtonTopLeft(idn, x, y) SetButtonTopLeftLoc(g_bundleCount, x, y) } } } DllCall("VirtualFreeEx", "Uint", hProc, "Uint", pProc, "Uint", 0, "Uint", 0x8000) DllCall("CloseHandle", "Uint", hProc) }FocusButton(n) { global g_bundleCount ; these static variables can become inaccurate if windows are created or closed ; inbetween pressing of hotkeys, but in practice, we can safely ignore the ; inaccuracy static prevBundleIndex := 0 static prevWindowIndex := 0 Build_hWndArray(n) If (g_bundleCount >= n) { bundleSize := BundleSize(n) If n = %prevBundleIndex% windowIndex := Mod(prevWindowIndex, bundleSize) + 1 Else windowIndex := 1 hWnd := Get_hWndFromArray(n, windowIndex) If bundleSize > 1 ; cycle through windows in the same bundle WinActivate, ahk_id %hWnd% Else ; Single-window bundle; Toggles Between activating (restoring) and minimizing the window IfWinActive, ahk_id %hWnd% WinMinimize, ahk_id %hWnd% Else WinActivate, ahk_id %hWnd% prevBundleIndex := n prevWindowIndex := windowIndex } }GetTaskSwBar() { ControlGet, hParent, hWnd,, MSTaskSwWClass1 , ahk_class Shell_TrayWnd ControlGet, hChild , hWnd,, ToolbarWindow321, ahk_id %hParent% Loop { ControlGet, hWnd, hWnd,, ToolbarWindow32%A_Index%, ahk_class Shell_TrayWnd If Not hWnd Break Else If hWnd = %hChild% { idxTB := A_Index Break } } ReturnidxTB }GetTaskbarButtonTopLeft(id, ByRef x, ByRef y) { idxTB := GetTaskSwBar() WinGet,pidTaskbar, PID, ahk_class Shell_TrayWnd hProc := DllCall("OpenProcess", "Uint", 0x38, "int", 0, "Uint", pidTaskbar) pProc := DllCall("VirtualAllocEx", "Uint", hProc, "Uint", 0, "Uint", 32, "Uint", 0x1000, "Uint", 0x4) idxTB := GetTaskSwBar() SendMessage, 0x433, id, pProc, ToolbarWindow32%idxTB%, ahk_class Shell_TrayWnd ; TB_GETRECT ;IfEqual, ErrorLevel, 0, return "Err: can't get rect" VarSetCapacity(rect, 32, 0) DllCall("ReadProcessMemory", "Uint", hProc, "Uint", pProc, "Uint", &rect, "Uint", 32, "Uint", 0) DllCall("VirtualFreeEx", "Uint", hProc, "Uint", pProc, "Uint", 0, "Uint", 0x8000) DllCall("CloseHandle", "Uint", hProc) ControlGet, hWnd, hWnd,, ToolbarWindow32%idxTB%, ahk_class Shell_TrayWnd WinGetPos, x, y, w, h, ahk_id %hWnd% left := NumGet(rect, 0) top := NumGet(rect, 4) Right := NumGet(rect, 8) Bottom := NumGet(rect, 12) x := x + left y := y + top }