※ 引述《name2name2 (yang~hi)》之铭言：
: 想请问大家有什么快速的方式可以取得鼠标座标吗?
: 我是有想尝试写一个win环境跑的小工具做这件事，
: 不过想问有什么现有的软件已经能做到了吗?
: (我是有试过最原始的方式就是一直试误修正...)
: 还有这种工具大家会需要吗?
AHK的原始码档案，论坛抓来的，把字改成繁体而已，有需要的可以自己压成执行档
(.exe)
Gui, Add, GroupBox, x2 y2 w200 h60 , 窗口信息
Gui, Add, Text, x5 y19 w32 h14 , 标题:
Gui, Add, Edit, x38 y17 w159 h18 ved1 HwndH1,
Gui, Add, Text, x5 y39 w32 h14 , 类:
Gui, Add, Edit, x38 y37 w159 h18 ved2 HwndH2,
Gui, Add, GroupBox, x2 y62 w200 h78 , 鼠标指针下信息
Gui, Add, Text, x7 y80 w45 h14 , 类别名:
Gui, Add, Edit, x51 y78 w146 h17 ved3 HwndH3,
Gui, Add, Text, x6 y98 w45 h14 , 文本:
Gui, Add, Edit, x51 y97 w146 h17 ved4 HwndH4,
Gui, Add, Text, x6 y117 w44 h15 , 颜色:
Gui, Add, Edit, x51 y116 w146 h17 ved5 HwndH5,
Gui, Add, GroupBox, x2 y140 w200 h57 , 鼠标坐标( X Y)
Gui, Add, Text, x9 y158 w55 h15 , 整个屏幕:
Gui, Add, Edit, x74 y156 w123 h18 ved6 HwndH6,
Gui, Add, Text, x9 y177 w67 h15 , 激活窗口中:
Gui, Add, Edit, x74 y176 w123 h18 ved7 HwndH7,
Gui, Add, GroupBox, x2 y197 w200 h57 , 位置[左边x,顶边y,宽度w,高度h]
Gui, Add, Text, x7 y214 w78 h15 , 激活窗口:
Gui, Add, Edit, x85 y212 w113 h18 ved8 HwndH8,
Gui, Add, Text, x7 y233 w78 h15 , 鼠标下控件:
Gui, Add, Edit, x85 y231 w113 h18 ved9 HwndH9,
Gui, Add, GroupBox, x2 y254 w200 h110 , 窗口文本[包含隐藏文本]
Gui, Add, Edit, x4 y267 w195 h93 ved10 HwndH10,
Gui, Add, Text, x7 y367 w198 h25 c0339E5 gUkl,热键:Ctrl+Win 或 鼠标中键 `n
by 星雨朝霞
OnMessage(0x202,"WM_LBUTTONUP")
; Generated using SmartGUI Creator 4.0
;Gui,+AlwaysOnTop
Gui, Show, x0 y28 h393 w205, AHK 视窗讯息 1.1
WinSet, Transparent, 200,ahk_class AutoHotkeyGUI ; 让窗口稍微有点透明效果
WinSet,TopMost,,ahk_class AutoHotkeyGUI ; 让窗口置顶
Return
ukl:
run,tencent://message/?uin=458926486&Site=knmb.cn&Menu=yes
Return
~MButton::
Goto winpos
Return
~^LWin::
Goto winpos
Return
~#ctrl::
Goto winpos
Return
~^rWin::
Goto winpos
Return
winpos:
CoordMode,mouse,Screen ;设置坐标模式为全屏
DetectHiddenText, On ;探测隐藏的文本
MouseGetPos,sx,sy,win,class ;取鼠标下信息
;取标题
WinGetTitle,title,ahk_id %win%
GuiControl,,ed1,%title%
;窗口类
WinGetClass,winclass,ahk_id %win%
GuiControl,,ed2,ahk_class %winclass%
if class <>
{
;控件类别名
GuiControl,,ed3,%class%
;控件文本
ControlGetText,text,%class%,ahk_id %win%
GuiControl,,ed4,%text%
;控件大小
ControlGetPos,ctrlx,ctrly,ctrlw,ctrlh,%class%,ahk_id %win%
GuiControl,,ed9,%ctrlx%,%ctrly%,%ctrlw%,%ctrlh%
}
Else
{
;置空
GuiControl,,ed3,
GuiControl,,ed4,
GuiControl,,ed9,
}
;颜色
PixelGetColor,mousecolor,%sx%,%sy%,RGB
GuiControl,,ed5,%mousecolor%
;全屏坐标
GuiControl,,ed6,%sx%,%sy%
;当前激活窗口内的鼠标坐标
CoordMode,mouse,relative ;置坐标模式为当前窗口
MouseGetPos,wx,wy
GuiControl,,ed7,x%wx% y%wy%
;当前窗口大小
WinGetPos,winx,winy,winw,winh,A
GuiControl,,ed8,%winx%,%winy%,%winw%,%winh%
;窗口文本,
WinGetText,wintext,ahk_id %win%
GuiControl,,ed10,%wintext%
Return
GuiClose:
ExitApp
WM_LBUTTONUP(wParam,lParam,uMsg,hWnd)
{
if A_GuiControl in ed1,ed2,ed3,ed4,ed5,ed6,ed7,ed8,ed9
{
GuiControlGet,EditText,,%A_GuiControl%
if (EditText!=""){
Clipboard=%EditText%
ToolTip,已复制: %EditText%
SetTimer,RemoveToolTip,1000
}
}
}
RemoveToolTip:
{
SetTimer, RemoveToolTip, off
ToolTip
return
}