Hotkey, Tab, TabControl
SetTimer, ChaseCoordinates, 100
Return
ChaseCoordinates:
CoordMode, Mouse
MouseGetPos, XPosAbs, YPosAbs
CoordMode, Mouse, Relative
MouseGetPos, XPosRel, YPosRel, WinID, WinControl
ControlGetFocus, WinControlGF, % "ahk_id" WinID
ControlGetPos, ControlX, ControlY, ControlW
, ControlH, % WinControl, % "ahk_id" WinID
ToolTip, % Info() . "`n`n press tab to save info"
If (GetKeyState("scF" "P") And TabRelease) ; tab
{
SetTimer, ChaseCoordinates, Off
Clipboard := Info()
StringReplace, Clipboard, Clipboard
, current coordinate
, saved info
ToolTip, % Info() . "`n`n saved"
Sleep, 500
SetTimer, ChaseCoordinates, 100
}
Return
TabControl:
TabPresed := A_TickCount, TabRelease := 1
While GetKeyState("scF", "P")
{
Sleep, 10
If A_TickCount-TabPresed > 500
{
TabRelease := 0
KeyWait, Tab
}
}
TabRelease := 0
Return
Info()
{
Global
Return, % " current coordinate"
. "`nabsolute (screen): "XPosAbs ", "YPosAbs
. "`nrelative (window): "XPosRel ", "YPosRel
. "`ncontrolgetfocus: "WinControlGF
. "`ncontrolname: "WinControl
. "`ncontrolstartposition: "ControlX ", "ControlY
. "`ncontrolsize: "ControlW ", "ControlH
}
F5::Reload
Esc::ExitApp