托盘图标调用qq,单击截图,双击文字识别

#Persistent

#SingleInstance,force

Menu, Tray, NoStandard

; 图标 ,托盘,不是标准

programName:=”截图”

Menu, Tray, Click, 1

 

;***********************************************************

Menu, Tray, Add, 截图, OnClick

;菜单项截图,调动OnClick实现。

Menu, Tray, Add, 重启,reload

Menu, Tray, Add, 退出,OnExit

;这几句右键菜单

;***********************************************************

Menu, Tray, Default, 截图

;这句注释后就失效了单击双击,

Menu,Tray,Tip,%programName%

;在托盘图标上悬停鼠标会显示“”截图“”

retur;***********************************************************

reload:

reload

return

OnExit:

ExitApp

return

 

;***********************************************************

 

OnClick:

if !LastClick

{

LastClick := 1

LastTC := A_TickCount

SetTimer,SingleClickEvent,-300

 

}

else if (A_TickCount-LastTC<300)

{

SetTimer,SingleClickEvent,off

gosub,DoubleClickEvent

 

}

return

;***********************************************************

 

 

SingleClickEvent:

send ^+o

LastClick := 0

 

return

;***********************************************************

 

 

DoubleClickEvent:

send ^!a

LastClick := 0

 

return

;***********************************************************

人已赞赏
AHKV1办公

循环切换Excel的当前工作表 By FeiYue

2020-5-9 7:58:13

AHKV1

鼠标左键双击关闭窗口的一种办法。

2020-5-11 14:32:49

0 条回复 A文章作者 M管理员
    暂无讨论,说说你的看法吧
个人中心
购物车
优惠劵
今日签到
有新私信 私信列表
有新消息 消息中心
搜索