【问题标题】:Is there a way to make multiple windows "active" at one time? in Windows?有没有办法一次使多个窗口“活动”?在 Windows 中?
【发布时间】:2019-04-25 12:33:47
【问题描述】:

假设我创建了一个程序,一个屏幕键盘。我想让它处于活动状态,以便它可以接收我的键盘输入,即使 Google Chrome 或 Notepad.exe 等其他程序也在接收我的键盘输入。我主要希望我的键盘像“Nohboard”一样运行我遇到了麻烦,因为一旦我的键盘看起来和像我想要的那样工作,每当我打开另一个窗口时,只要“Windows 7”专注于我的键盘就不会工作例如“notepad.exe”。我这样做的原因是使用我自己的软件在屏幕上监控我的击键。我正在尝试使用 gm studio 1.4 设计我的键盘,但无法同时激活多个窗口,每次我点击远离我可以创建的键盘程序时,我的键盘都会变得无用。 有什么可以使用的解决方法吗?也许由另一个程序创建的第 3 方脚本允许我的程序窗口“活动”并接收键盘击键输入,而另一个程序也处于活动状态并接收键盘击键输入? 提前感谢任何能想到一个有用的解决方案的人。

Space::
SetTitleMatchMode, 2
ControlSend, , {Space Down}, Typing Lessons
ControlSend, , {Space Down}, kb
Keywait, Space
ControlSend, , {Space Up}, kb
ControlSend, , {Space Up}, Typing Lessons
Return

我刚刚弄清楚如何使用自动热键脚本的一件事是将密钥发送到多个程序。有没有办法使用自动热键将其发送到“最后一个活动窗口”和“当前活动窗口”?

【问题讨论】:

标签: windows keyboard focus autohotkey


【解决方案1】:

在 Windows 系统上,无法同时激活多个 Windows。

只能激活一个窗口。 (重点)

但是有两种方法可以帮助您解决问题。

1 - 例如,您可以在屏幕键盘窗口中忽略/禁用该键盘窗口的焦点。 (无焦点)(无激活 + +E0x08000000)

试试这个 Ahk 脚本。

注意:这是从 F1 到 F12 的屏幕按键条

Example1.ahk

Gui, +LastFound +AlwaysOnTop +ToolWindow -Caption +Border +E0x08000000
Gui, Font, s07, Arial
Loop, 12
Gui, Add, Button, % "x" 5+(A_Index-1)*60 " y5 w60 h25 vF" A_Index " gButton", F%A_Index%
Gui, Show, y0 w730 h35 NoActivate
Return

Button:
    SendInput, % "{" A_GuiControl "}"
Return

GuiClose:
    ExitApp
Return

~esc::exitapp

2 - 或者您可以使用第 3 方脚本,

注意:一起运行这两个脚本。 (KeypressValueToREG + ShowKeypressValue)

第一个是大型脚本,但您可以做很多事情,它会将您所有的鼠标和键盘移动放入只有一个 Windows 注册表项。

这个 KeypressValueToREG 脚本的强大之处在于,您可以在后台运行它,然后您可以在其他应用程序或其他语言 Visual Studio/Visual Basic/c++/Python/Autohotkey/?他们只需要访问/读取该一个注册表项。

KeypressValueToREG.ahk

;KeypressValueToREG.ahk comes from KeypressOSD.ahk that was Created by Author RaptorX
; Open this Script in Wordpad and For Changelog look to the Bottom of the script. 
;This code works with a getkeyname from a Dllcall (See Bottom Script- by Lexikos)
;you can press the esc key to exit.

#SingleInstance force
#NoEnv
SetBatchLines, -1
ListLines, Off

; Settings
    global TransN                := 200      ; 0~255
    global ShowSingleKey         := True
    global ShowMouseButton       := True
    global ShowSingleModifierKey := True
    global ShowModifierKeyCount  := true
    global ShowStickyModKeyCount := false
    global DisplayTime           := 2000     ; In milliseconds
    global GuiPosition           := "Bottom" ; Top or Bottom
    global FontSize              := 50
    global GuiHeight             := 115

CreateGUI()
CreateHotkey()
return

OnKeyPressed:
    try {
        key := GetKeyStr()
        ShowHotkey(key)
        SetTimer, HideGUI, % -1 * DisplayTime
    }
return

OnKeyUp:
return

_OnKeyUp:
    tickcount_start := A_TickCount
return


CreateGUI() {
    global

    Gui, +AlwaysOnTop -Caption +Owner +LastFound +E0x20
    Gui, Margin, 0, 0
    Gui, Color, Black
    Gui, Font, cWhite s%FontSize% bold, Arial
    Gui, Add, Text, vHotkeyText Center y20

    WinSet, Transparent, %TransN%
}

CreateHotkey() {
    Loop, 95
    {
        k := Chr(A_Index + 31)
        k := (k = " ") ? "Space" : k

        Hotkey, % "~*" k, OnKeyPressed
        Hotkey, % "~*" k " Up", _OnKeyUp
    }

    Loop, 24 ; F1-F24
    {
        Hotkey, % "~*F" A_Index, OnKeyPressed
        Hotkey, % "~*F" A_Index " Up", _OnKeyUp
    }

    Loop, 10 ; Numpad0 - Numpad9
    {
        Hotkey, % "~*Numpad" A_Index - 1, OnKeyPressed
        Hotkey, % "~*Numpad" A_Index - 1 " Up", _OnKeyUp
    }

    Otherkeys := "WheelDown|WheelUp|WheelLeft|WheelRight|XButton1|XButton2|Browser_Forward|Browser_Back|Browser_Refresh|Browser_Stop|Browser_Search|Browser_Favorites|Browser_Home|Volume_Mute|Volume_Down|Volume_Up|Media_Next|Media_Prev|Media_Stop|Media_Play_Pause|Launch_Mail|Launch_Media|Launch_App1|Launch_App2|Help|Sleep|PrintScreen|CtrlBreak|Break|AppsKey|NumpadDot|NumpadDiv|NumpadMult|NumpadAdd|NumpadSub|NumpadEnter|Tab|Enter|Esc|BackSpace"
               . "|Del|Insert|Home|End|PgUp|PgDn|Up|Down|Left|Right|ScrollLock|CapsLock|NumLock|Pause|sc145|sc146|sc046|sc123"
    Loop, parse, Otherkeys, |
    {
        Hotkey, % "~*" A_LoopField, OnKeyPressed
        Hotkey, % "~*" A_LoopField " Up", _OnKeyUp
    }

    If ShowMouseButton {
        Loop, Parse, % "LButton|MButton|RButton", |
            Hotkey, % "~*" A_LoopField, OnKeyPressed
    }

    for i, mod in ["Ctrl", "Shift", "Alt"] {
        Hotkey, % "~*" mod, OnKeyPressed
        Hotkey, % "~*" mod " Up", OnKeyUp
    }
    for i, mod in ["LWin", "RWin"]
        Hotkey, % "~*" mod, OnKeyPressed
}

ShowHotkey(HotkeyStr) {
    WinGetPos, ActWin_X, ActWin_Y, ActWin_W, ActWin_H, A
    if !ActWin_W
        throw

    text_w := (ActWin_W > A_ScreenWidth) ? A_ScreenWidth : ActWin_W

    ;remove this gui codeline if you want only to Write the Value to Windows registry
    ;GuiControl,     , HotkeyText, %HotkeyStr%
    ;GuiControl,     , HotkeyText, %HotkeyStr%

    RegWrite, REG_SZ, HKEY_CURRENT_USER,software\GetKeypressValue,KeypressValue,%HotkeyStr%

    ;remove this gui codeline if you want only to Write the Value to Windows registry
    ;GuiControl, Move, HotkeyText, w%text_w% Center
    ;GuiControl, Move, HotkeyText, w%text_w% Center

    if (GuiPosition = "Top")
        gui_y := ActWin_Y
    else
        gui_y := (ActWin_Y+ActWin_H) - 115 - 50

    ;remove this gui codeline if you want only to Write the Value to Windows registry
    ;Gui, Show, NoActivate x%ActWin_X% y%gui_y% h%GuiHeight% w%text_w%
    ;Gui, Show, NoActivate x%ActWin_X% y%gui_y% h%GuiHeight% w%text_w%
}

GetKeyStr() {
    static modifiers := ["Ctrl", "Shift", "Alt", "LWin", "RWin"]
    static repeatCount := 1

    for i, mod in modifiers {
        if GetKeyState(mod)
            prefix .= mod " + "
    }

    if (!prefix && !ShowSingleKey)
        throw

    key := SubStr(A_ThisHotkey, 3)

    if (key ~= "i)^(Ctrl|Shift|Alt|LWin|RWin)$") {
        if !ShowSingleModifierKey {
            throw
        }
        key := ""
        prefix := RTrim(prefix, "+ ")

        if ShowModifierKeyCount {
            if !InStr(prefix, "+") && IsDoubleClickEx() {
                if (A_ThisHotKey != A_PriorHotKey) || ShowStickyModKeyCount {
                    if (++repeatCount > 1) {
                        prefix .= " ( * " repeatCount " )"
                    }
                } else {
                    repeatCount := 0
                }
            } else {
                repeatCount := 1
            }
        }
    } else {
        if ( StrLen(key) = 1 ) {
            key := GetKeyChar(key, "A")
        } else if ( SubStr(key, 1, 2) = "sc" ) {
            key := SpecialSC(key)
        } else if (key = "LButton") && IsDoubleClick() {
            key := "Double-Click"
        }
        _key := (key = "Double-Click") ? "LButton" : key

        static pre_prefix, pre_key, keyCount := 1
        global tickcount_start
        if (prefix && pre_prefix) && (A_TickCount-tickcount_start < 300) {
            if (prefix != pre_prefix) {
                result := pre_prefix pre_key ", " prefix key
            } else {
                keyCount := (key=pre_key) ? (keyCount+1) : 1
                key := (keyCount>2) ? (key " (" keyCount ")") : (pre_key ", " key)
            }
        } else {
            keyCount := 1
        }

        pre_prefix := prefix
        pre_key := _key

        repeatCount := 1
    }
    return result ? result : prefix . key
}

SpecialSC(sc) {
    static k := {sc046: "ScrollLock", sc145: "NumLock", sc146: "Pause", sc123: "Genius LuxeMate Scroll"}
    return k[sc]
}

; by Lexikos - https://autohotkey.com/board/topic/110808-getkeyname-for-other-languages/#entry682236
GetKeyChar(Key, WinTitle:=0) {
    thread := WinTitle=0 ? 0
        : DllCall("GetWindowThreadProcessId", "ptr", WinExist(WinTitle), "ptr", 0)
    hkl := DllCall("GetKeyboardLayout", "uint", thread, "ptr")
    vk := GetKeyVK(Key), sc := GetKeySC(Key)
    VarSetCapacity(state, 256, 0)
    VarSetCapacity(char, 4, 0)
    n := DllCall("ToUnicodeEx", "uint", vk, "uint", sc
        , "ptr", &state, "ptr", &char, "int", 2, "uint", 0, "ptr", hkl)
    return StrGet(&char, n, "utf-16")
}

IsDoubleClick(MSec = 300) {
    Return (A_ThisHotKey = A_PriorHotKey) && (A_TimeSincePriorHotkey < MSec)
}

IsDoubleClickEx(MSec = 300) {
    preHotkey := RegExReplace(A_PriorHotkey, "i) Up$")
    Return (A_ThisHotKey = preHotkey) && (A_TimeSincePriorHotkey < MSec)
}

HideGUI() {
    Gui, Hide
}

~esc::exitapp    
;---------------------------------------------
; ChangeLog : v2.22 (2017-02-25) - Now pressing the same combination keys continuously more than 2 times,
;                                  for example press Ctrl+V 3 times, will displayed as "Ctrl + v (3)"
;             v2.21 (2017-02-24) - Fixed LWin/RWin not poping up start menu
;             v2.20 (2017-02-24) - Added displaying continuous-pressed combination keys.
;                                  e.g.: With CTRL key held down, pressing K and U continuously will shown as "Ctrl + k, u"
;             v2.10 (2017-01-22) - Added ShowStickyModKeyCount option
;             v2.09 (2017-01-22) - Added ShowModifierKeyCount option
;             v2.08 (2017-01-19) - Fixed a bug
;             v2.07 (2017-01-19) - Added ShowSingleModifierKey option (default is True)
;             v2.06 (2016-11-23) - Added more keys. Thanks to SashaChernykh.
;             v2.05 (2016-10-01) - Fixed not detecting "Ctrl + ScrollLock/NumLock/Pause". Thanks to lexikos.
;             v2.04 (2016-10-01) - Added NumpadDot and AppsKey
;             v2.03 (2016-09-17) - Added displaying "Double-Click" of the left mouse button.
;             v2.02 (2016-09-16) - Added displaying mouse button, and 3 settings (ShowMouseButton, FontSize, GuiHeight)
;             v2.01 (2016-09-11) - Display non english keyboard layout characters when combine with modifer keys.
;             v2.00 (2016-09-01) - Removed the "Fade out" effect because of its buggy.
;                                - Added support for non english keyboard layout.
;                                - Added GuiPosition setting.
;             v1.00 (2013-10-11) - First release.
;--------------------------------------------

第二个它将在您的桌面屏幕上显示视觉您所有的鼠标和键盘动作,您可以稍微更改此脚本,然后制作您自己的键盘,可以显示您的所有键盘动作,

如果您使用 Example1.ahk 中的技巧,那么您可以制作一个专业屏幕键盘,而无需关注窗口。

ShowKeypressValue.ahk

#SingleInstance force
Gui, +AlwaysOnTop -MaximizeBox ; -Caption +Resize -MinimizeBox +Disabled -SysMenu -Owner +OwnDialogs
Gui, Add, Text, center y10 h50 w300 vVar,  %KeypressValue%
Gui, Color, White
Gui, show
size=20
Gui, Font, s%size%
GuiControl, Font, var

;run KeypressValueToREG.ahk - together with ShowKeypressValue.ahk
;The Features Are:
; - It will Show On your Screen, [All your Mouse Movements] and [All Keyboard Shortcuts Movement]
; - You can Make Scripts, that can do actions with MultiClicks on All Keyboard Shortcuts Clicks, How Cool Is that. 

loop
{
RegRead, KeypressValue, HKEY_CURRENT_USER,software\GetKeypressValue,KeypressValue ; read KeypressValue
sleep 50
GuiControl,, var, %KeypressValue%



if (KeypressValue="Alt ( * 2 )") ;use this for [1x=Alt][2x=Alt ( * 2 )][3x=Alt ( * 3 )] [and many more]
{
;Here you can put any AHK CODE 
msgbox you did click Alt 2x Times
}

if (KeypressValue="Alt ( * 3 )") ;use this for [1x=Alt][2x=Alt ( * 2 )][3x=Alt ( * 3 )] [and many more]
{
;Here you can put any AHK CODE 
msgbox you did click Alt 3x Times
}


} ;End Loop

~esc::exitapp

【讨论】:

  • 这看起来棒极了,我需要编辑哪个部分才能将击键重定向到“kb.exe”? @stevecody
  • @Iroamalone Atnight - 有两种方法可以重定向击键 - 1:您可以编辑 ShowKeypressValue.ahk 并将击键重定向到 kb.exe - 2:或者您可以使用其他只能访问该 Windows 注册表项的语言(ps - 我不确定您是否使用 gamemaker studio 1.4 制作了 kb.exe,如果是,您需要确定该语言是否能够读取该 Windows 注册表项)
  • @Iroamalone Atnight - 如果游戏制作工作室 1.4 语言无法访问该 Windows 注册表项,那么您可以考虑使用第三方自动化软件,我正在使用 Buttoncommander - 有了它,您可以创建非常桌面上可以执行任何类型的 Autohotkey 脚本的简单按钮图标 - 然后您可以执行此操作,如果 Windows 注册表键值为“a”,则突出显示按钮图标 a
  • @Iroamalone Atnight - Autohotkey 与 Buttoncommander 一起,您可以让更多人思考更多观看这些视频,而您现在为什么 Toolbars、剪贴板、虚拟键盘、监视器键盘、启动板、Enterpads、Intelligence Google Search Buttons
  • 你有兴趣为我设计吗?你会收多少钱?这东西对我来说很困惑,我认为如果没有大量培训,我目前无法做到。如果您有兴趣,请发送电子邮件至“Bladevampirek@aol.com”,我可以将程序发送给您,以查看您是否能够做到。
【解决方案2】:

试试这个。

#NoEnv
#SingleInstance Force
SetWorkingDir %A_ScriptDir%
#InstallKeybdHook
#UseHook

; Add the keys you want send to the last active window in this array:
Keys := ["a","b","c","1","2","3","space",",",".","-","_","F3"]  ; ... 
for each, key in Keys
    Hotkey, %key%, send_key_to_last_active_window, on

SetTimer get_last_active_window, 300 ; you can decrease this period (number of milliseconds that pass before the timer is executed)
return

send_key_to_last_active_window:
    Send, {%A_ThisHotkey%}
    ; WinGetTitle, Title, ahk_id %LastActive_ID%
    ; WinGetClass, Class, ahk_id %LastActive_ID%
    ; ToolTip, last_active_window=%Title% ahk_class %Class%,,, 2
    ; If Class in Notepad,WordPadClass ; if the last active window is Notepad or WordPad
        ControlSend,, {%A_ThisHotkey%}, ahk_id %LastActive_ID%
return

    get_last_active_window:
WinGet, CurrentActive_ID, ID, A
If (CurrentActive_ID != NewActive_ID)
{
    LastActive_ID = %NewActive_ID%
    NewActive_ID := CurrentActive_ID
    ; WinGetTitle, NewActiveTitle,  ahk_id %NewActive_ID%   
    ; WinGetTitle, LastActiveTitle,  ahk_id %LastActive_ID%
    SetTimer get_last_active_window, off
    ; CoordMode, ToolTip, Screen
    ; ToolTip, Current active window:`nTitle: %NewActiveTitle%`nID: %NewActive_ID%`n`nLast active window:`nTitle: %LastActiveTitle%`nID: %LastActive_ID%, 0, 0, 1
    WinWaitNotActive, ahk_id %NewActive_ID% 
    SetTimer get_last_active_window, on
}
return

请参阅文档中的 For-LoopHotkeySetTimer

【讨论】:

  • 完全不可靠,有很多闪烁。这没有用,甚至作为概念验证也没有用(除非您试图证明这不是解决方案)。
  • 在我的系统上它工作正常。工具提示仅用于测试。
  • Works on My Machine 认证没有任何迹象,该代码是正确的。显然,该脚本运行一个具有任意时间的计时器,以使用轮询。轮询是一种抽样方式。与所有采样一样,您会丢失采样点之间发生的所有事件。不,我担心,这只是一个拼凑,而不是解决方案。解决方案在 cmets 中给出。
  • 从逻辑上讲,如果它在您的系统/程序上不起作用,那么它或您使用它的方式有问题或缺失。据我在您的个人资料中看到的,您可能是其他领域的专家,但不是 AHK。用户要求 AHK 中的解决方案
  • 我刚刚解释了许多故障模式(轮询)中的 一种。不管我是否在这里回答 AHK 的问题。我很清楚 AHK 系统在 on 上运行,并且我为 OP 似乎提出的问题提供了系统级解决方案。系统制定了任何程序都需要遵循的规则,AHK 也不例外。将您提出的解决方案与我的 cmets 与问题进行对比,您很快就会发现,哪种方法更有可能产生 可靠 解决方案。解决方案不必在我的系统上失败,我就能看到它是如何失败的。
猜你喜欢
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 1970-01-01
  • 2020-01-24
  • 1970-01-01
  • 1970-01-01
相关资源
最近更新 更多