| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 钩子的hock，我开发文件换了个电脑，为啥不能用了 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=139469) |
| -- 作者：weibu -- 发布时间：2019/8/13 15:27:00 -- 钩子的hock，我开发文件换了个电脑，为啥不能用了 本来在另外一台电脑做了一个钩子，把开发文件直接复制到另外一台电脑，插上加密锁打开文件，为啥钩子不能用了？ |
| -- 作者：有点蓝 -- 发布时间：2019/8/13 15:40:00 -- 什么钩子，怎么做的，新建一个项目重复这种用法有没有问题？ |
| -- 作者：weibu -- 发布时间：2019/8/13 16:45:00 -- 用于监测鼠标、键盘操作的钩子 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=95436&replyID=&skin=1 跟这个一样的
|
| -- 作者：有点蓝 -- 发布时间：2019/8/13 16:58:00 -- 这个例子我测试没有问题。什么操作系统？新建项目重复这种用法有没有问题？ |
| -- 作者：weibu -- 发布时间：2019/8/14 10:36:00 -- windows系统，原来我用的是狐表开发版，现在用的是高开版。跟这个有关系吗？ 原来用的win7 32位，现在用的win10，64位。有影响吗？ 如何做兼容 Public Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long) Public const MOUSEEVENTF_MOVE As Int32 = &H1 \' mouse move Public const MOUSEEVENTF_LEFTDOWN As Int32 = &H2 \' left button down Public const MOUSEEVENTF_LEFTUP As Int32 = &H4 \' left button up Public const MOUSEEVENTF_RIGHTDOWN As Int32 = &H8 \' right button down Public const MOUSEEVENTF_RIGHTUP As Int32 = &H10 \' right button up Public const MOUSEEVENTF_MIDDLEDOWN As Int32 = &H20 \' middle button down Public const MOUSEEVENTF_MIDDLEUP As Int32 = &H40 \' middle button up Public const MOUSEEVENTF_ABSOLUTE As Int32 = &H8000 \' absolute move Public const MOUSEEVENTF_WHEEL As Int32 = &H800 \' wheel button rolled <DllImport("user32.dll", EntryPoint := "SetCursorPos")> _ Public Function SetCursorPos(x As Integer, y As Integer) As Boolean End Function
[此贴子已经被作者于2019/8/14 10:50:13编辑过]
|
| -- 作者：有点蓝 -- 发布时间：2019/8/14 11:01:00 -- 现在没有win10电脑，晚点再试试 |
| -- 作者：weibu -- 发布时间：2019/8/14 16:19:00 -- 蓝老师，试了没？我这边从win7发布后的程序，在win10可正常运行。 但开发文件在win10没用，并且发布后的程序也不行。
|