在AutoHotKey中,如果LButton在热键上下文中使用时如何阻止它被发送,但如果在其他地方使用它则不会阻止它被发送?

时间:2016-07-15 16:17:30

标签: autohotkey

我有这个脚本:

~LButton & RButton::
    Click Middle
Return

当我同时按LButtonRButton时,它们将作为MButton工作。这确实有效,但它也会发送LButton。如果我从热键前缀中删除~LButton将完全停止工作。

我尝试了各种方法让它发挥作用。

工作:

#If GetKeyState("LButton", "P")
RButton::
    Click Middle
Return

这也不起作用:

middleclicktrigger := False

LButton & RButton::
    middleclicktrigger := True
    Click Middle
    middleclicktrigger := False
Return

~LButton::
    If (middleclicktrigger) {
        BlockInput, Mouse
    }
Return

这个据说有效,但我遇到了一个问题,我无法按住并拖动LButton正常使用。通过简单的左键单击它可以正常工作,但是当它没有与热键组合中的鼠标右键一起使用时,我需要它作为普通的鼠标左键工作:

middleclicktrigger := False

LButton & RButton::
    middleclicktrigger := True
    Click Middle
    middleclicktrigger := False
Return

LButton::
    IF (!middleclicktrigger) {
        Click down
    }
Return

LButton up::
    IF (!middleclicktrigger) {
        Click up
    }
Return

2 个答案:

答案 0 :(得分:1)

好的,我以最复杂的方式解决了这个问题。如果你有一个更清洁的方法,请给我,因为我对此感到不舒服,但它的工作原理嘿。

middleclick := False
leftclick := False
rightclick := False

Loop {
    If (GetKeyState("LButton", "P") && GetKeyState("RButton", "P") && !middleclick) {
        middleclick := True
        BlockInput, Mouse
        Click Middle
        SetTimer, middleclickfalse, -1000
    } Else If (GetKeyState("LButton", "P") && !leftclick && !middleclick) {
        leftclick := True
        Click down
    } Else If (GetKeyState("RButton", "P") && !rightclick && !middleclick) {
        rightclick := True
        Click down right
    }

    Sleep, 10
}

middleclickfalse:
    middleclick := False
Return

LButton up::
    If (!middleclick) {
        If (leftclick) {
            Click up
            leftclick := False
        }
    }
Return

RButton up::
    If (!middleclick) {
        If (rightclick) {
            Click up right
            rightclick := False
        }
    }
Return

答案 1 :(得分:0)

有人对此感到迷惑,请先阅读此内容。

发布此问题的人很近,但是...

简洁的答案

RButton::
if GetKeyState("LButton", "P")
Click Middle
else
Click r
Return