#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
;***********************************************************
任职学习