网页资讯视频图片知道文库贴吧地图采购
进入贴吧全吧搜索
autohotkey吧 关注：4,675贴子：16,165
  • 16回复贴，共1页

求助，如何复制浏览器中某个固定位置的一句话

按下鼠标左键，按住不放，移动到另一个位置，释放左键，复制
按住不放这个地方不会写


CoordMode,Mouse;把鼠标位置调为绝对位置
^+b::
MouseClick, , 543, 334, , 0, D
MouseClick, , 1065, 334, , 0, U
Send ^c
return
看了下不对，但是不知道哪里问题


你试试这个
~LButton::
cos_mousedrag_treshold := 20 ; pixels
MouseGetPos, cos_mousedrag_x, cos_mousedrag_y
win1 := WinActive("A")
KeyWait LButton
MouseGetPos, cos_mousedrag_x2, cos_mousedrag_y2
win2 := WinActive("A")
WinGetClass cos_class, A
if(((abs(cos_mousedrag_x2 - cos_mousedrag_x) > cos_mousedrag_treshold
or abs(cos_mousedrag_y2 - cos_mousedrag_y) > cos_mousedrag_treshold)) and win1 = win2
and cos_class != "ConsoleWindowClass")
{
SendInput ^c
}
return


CoordMode,Mouse ;把鼠标位置调为绝对位置
^b::
MouseClick, , 543, 334, , 0, D
MouseClick, , 1065, 334, , 0, U
Send ^c
return
这样应该就可以了


CoordMode,Mouse ;把鼠标位置调为绝对位置
^z::
MouseClick, ,534,334, ,0,D
MouseClick, ,974,334, ,0,U
Send ^c
WinActivate, ahk_class XLMAIN
Send ^v
Send Tab
WinActivate, ahk_exe SogouExplorer.exe
MouseClick, ,441,268, ,0,D
MouseClick, ,500,268, ,0,U
Send ^c
WinActivate, ahk_class XLMAIN
Send ^v
Send Tab
WinActivate, ahk_exe SogouExplorer.exe
MouseClick, ,1262,268, ,0,D
MouseClick, ,1500,268, ,0,U
Send ^c
WinActivate, ahk_class XLMAIN
Send ^v
return
就是要复制浏览器中三个固定位置（地址、姓名、电话）的信息，有大神看看哪里有问题吗？现在到第一步复制地址没问题，然后excle表中光标tab到右一格失败了，是Send Tab不能这样用吗？


扫二维码下载贴吧客户端

下载贴吧APP
看高清直播、视频！
  • 16回复贴，共1页
分享到: