欢迎光临散文网 会员登陆 & 注册

【按键精灵】大漠插件怎么用?

2023-03-16 17:47 作者:秋天的落葉_  | 我要投稿

1 打开网址

http://bbs.anjian.com/showtopic-686179-1.aspx#11474138

官网下载dm31233.rar,解压(可能会报毒,但我就这么用的没发现问题)

2.里面有用的就3个文件,dm.dll、RegDll.dll、大漠接口说明.CHM,第三个是帮助文档,不懂就看

3.打开按键精灵,新建一个脚本,左侧工具栏点击“附件”--‘添加’,把两个dll放进来

4.左侧工具栏点击“脚本”--粘贴代码如下:

Call 注册大漠()//就是把插件导入进来,导入后才能用,且必须写在主程序前

Call 窗口绑定()//需要后台操作就绑定,不需要就删掉这行。绑定后的键鼠命令也自动变成后台键鼠命令了

//------把主程序写在下面-------

//具体语句怎么写,参考大漠接口说明.CHM帮助文档


//---------------写里面↑--------------

Sub 窗口绑定()//绑定完窗口内无法操作,且不可最小化,可以挪动。

hwnd=123456//举个例子123456,具体多少按键抓抓一下,替换。

    dm.SetWindowState hwnd,1

    dm_ret = dm.BindWindowEx(hwnd,"dx2","dx","dx","dx.public.active.message",4)

    Delay 2000

    If dm_ret = 1 Then 

        TracePrint "绑定成功"

    Else 

        TracePrint "错误码 " & dm.GetLastError()

        If dm.GetLastError() = - 3  Then 

            TracePrint "可能目标窗口有保护 或 异常错误"

        End If

    End If

    Delay 3000

End Sub

Sub OnScriptExit()//退出脚本的同时解除绑定,释放cpu

    dm_ret = dm.UnBindWindow()

    If dm_ret = 1 Then 

        TracePrint "解除绑定成功"

    End If

End Sub

Sub 注册大漠()

    need_ver = "3.1233"

    set ws=createobject("Wscript.Shell")

    ws.run "regsvr32 atl.dll /s"

    set ws=nothing

    PutAttachment "D:\4399DDT","*.*"//释放2个附件,这里路径可以随便改,但改完后面都得改。

    PutAttachment ".\Plugin" ,"RegDll.dll"//释放附件RegDll.dll,到按键精灵下的plugin文件夹

    Call Plugin.RegDll.Reg("D:\4399DDT\dm.dll") 

    set dm = createobject("dm.dmsoft")

    ver = dm.Ver()

    If ver = need_ver Then 

        TracePrint "注册成功!插件所在目录是:"&dm.GetBasePath()

    End If

    dm.SetPath "D:\4399DDT"

    Delay 500

End Sub

p.s.可以换的内容:主程序代码和释放附件路径,其余照抄(当新建脚本时.)


【按键精灵】大漠插件怎么用?的评论 (共 条)

分享到微博请遵守国家法律