发表回复 
让 右键 RButton 变成多功能按键
2015-07-20, 20 : 58 (这个帖子最后修改于: 2015-07-24 22 : 11 by robertL.)
Information 让 右键 RButton 变成多功能按键
[font=Times New Roman][size=medium]
~~~~~~~~~~懒人专用~~~~~~~~~~~~
功能键1346自己可算定义
1、单击右键,按住不动 默认启动算定义菜单,类似Candy,可自定义
2、单击右键, 正常功能
3、快速双击 , 默认为粘贴
4、快速双击,按住不动 默认为Candy快捷键
5、用不了
6、快速三击 默认为剪切
7、什么四连击五连杀的就不要想了


代码: (全选)
RButton::
RButtonCount++
if RButtonCount=1
    SetTimer,CheckR,-1000
if RButtonCount=1
KeyWait,RButton,U,T0.8
if ErrorLevel
    RButtonCount_Flag:=1
else
{
    KeyWait,RButton,D,T0.1
    if ErrorLevel
        RButtonCount_Flag:=2
    else
    {
        RButtonCount++
        RButtonCount_Flag:=3
    }
}
if RButtonCount_Flag=3
{
KeyWait,RButton,U,T0.8
if ErrorLevel
    RButtonCount_Flag:=4
else
{
    KeyWait,RButton,D,T0.1
    if ErrorLevel
        RButtonCount_Flag:=3
    else
    {
        RButtonCount++
        RButtonCount_Flag:=6
    }
}
}
if RButtonCount_Flag=1
        Menu, tray, Show                  ;功能键1
    else if RButtonCount_Flag=2
        Send {RButton}                    ;功能键2
    else if RButtonCount_Flag=3
        Send ^v                               ;功能键3
    else if RButtonCount_Flag=4
        Send ^{F1}                          ;功能键4
    else if RButtonCount_Flag=5
        ToolTip,5==%RButtonCount%     ;[/quote][/size][/font]这个用不了
    else if RButtonCount_Flag=6
    {                                            ;功能键5
        SetTimer, RemoveToolTip, -1000
        Sleep 100
        Clipboard=
        SendInput ^c
        SendInput ^x
        ClipWait,0.5
        ToolTip, %Clipboard%
    }
if  (RButtonCount_Flag=1 || RButtonCount_Flag=3 || RButtonCount_Flag=4 || RButtonCount_Flag=6)
    gosub,RCount
Return

RCount:
RButtonCount:=0
RButtonCount_Flag:=0
return

CheckR:
if ((RButtonCount=1 && RButtonCount_Flag=2) || (RButtonCount=2 && RButtonCount_Flag=5))
    gosub,RCount
return


附件
.zip  RButton.zip (大小: 957 bytes / 下载: 52)
查找这个用户的全部帖子
表示感谢 引用并回复 移动视图置页面顶端
[+] 4用户表示感谢jsttking0123
2015-07-20, 22 : 27
RE: 让 右键 RButton 变成多功能按键
对文件夹。文件无效
查找这个用户的全部帖子
表示感谢 引用并回复 移动视图置页面顶端
2015-07-21, 01 : 58
RE: 让 右键 RButton 变成多功能按键
@zhanglei1371
(2015-07-20 22 : 27)zhanglei1371 提到:  对文件夹。文件无效

再试试,应该是可以的
查找这个用户的全部帖子
表示感谢 引用并回复 移动视图置页面顶端
2015-07-21, 08 : 45
RE: 让 右键 RButton 变成多功能按键
(2015-07-21 01 : 58)jsttking0123 提到:  @zhanglei1371
(2015-07-20 22 : 27)zhanglei1371 提到:  对文件夹。文件无效

再试试,应该是可以的
可以。不过这个为何不行?
~LButton & RButton::Send ^{F1}
尤其对文件和文件夹
查找这个用户的全部帖子
表示感谢 引用并回复 移动视图置页面顶端
2015-07-24, 22 : 13
RE: 让 右键 RButton 变成多功能按键
很赞,实现了,鼠标右键的各种组合,不过可以更丰富,同时简单...
单击,短按,长按,及其成组..习惯了事半功倍...

One for all, but man for himself

帮推广:AHK知乎专栏
查找这个用户的全部帖子
表示感谢 引用并回复 移动视图置页面顶端
2015-10-06, 20 : 55
RE: 让 右键 RButton 变成多功能按键
高手,收下了!@jsttking0123
查找这个用户的全部帖子
表示感谢 引用并回复 移动视图置页面顶端
[+] 1用户表示感谢mincmd
2017-09-09, 12 : 50 (这个帖子最后修改于: 2017-09-11 18 : 54 by abc001.)
RE: 让 右键 RButton 变成多功能按键
很不错的想法,组合一下可以单独使用鼠标实现很多功能。
不过不能正常运行
---------------------------
让 右键 RButton 变成多功能按键.exe
---------------------------
Error: Target label does not exist.

Line#
---> 049: SetTimer,RemoveToolTip,-1000

The program will exit.
---------------------------
确定
---------------------------
查找这个用户的全部帖子
表示感谢 引用并回复 移动视图置页面顶端
发表回复 


论坛跳转:


联系我们 | Autohotkey 中文站 | 回到顶部 | 回到正文区 | 精简(归档)模式 | RSS 聚合