不注册大漠调用dm.dll的方法

187144831

首先解释一下,不注册调用大漠插件，实际上是使用dmreg.dll来配合实现,这个文件有2个导出接口
SetDllPathW和SetDllPathA。 SetDllPathW对应unicode，SetDllPathA对应ascii接口.
参数如下
SetDllPathA  字符串(Ascii码表示插件所在的路径),整数(0表示STA，1表示MTA)
SetDllPathW  字符串(Unicode码表示插件所在的路径),整数(0表示STA，1表示MTA)
那么这2个函数就可以代替以往我们使用的 regsvr32注册方式，或者RegDll注册方式。
下面分别介绍下各个平台的使用方法,需要注意的是,这个dll仅仅给3.1235之后的版本使用，之前的版本无效.
1. 按键平台(按键8及以上)
代码如下
// 如果你把DmReg.dll释放在了plugin目录 比如
PutAttachment ".\plugin","dmreg.dll"
Public Declare Function SetDllPathW Lib "dmreg.dll" Alias "SetDllPathW" (ByVal path As String, ByVal mode As Long) As Long
TracePrint SetDllPathW("c:\3.1235\dm.dll", 0)
// 下面就可以正常创建对象使用插件了
set dm = createobject("dm.dmsoft")
// 如果你把DmReg.dll释放在了别的目录 比如
PutAttachment "c:\test,"dmreg.dll"
Public Declare Function SetDllPathW Lib "c:\test\dmreg.dll" Alias "SetDllPathW" (ByVal path As String, ByVal mode As Long) As Long
TracePrint SetDllPathW("c:\3.1235\dm.dll", 0)
// 下面就可以正常创建对象使用插件了
set dm = createobject("dm.dmsoft")


谁能给我举个例子 在TC里面怎么写

如果TC里面用不了 也说一下  我就不浪费时间琢磨了

  肯定会采纳的

剑仙十号

tc简单开发。大漠3.1233免注册。
//exempt adj,免除的。 register n.注册,登记。
//EptReg 理解为免注册。
变量 线程ID
功能 执行()
变量 ws = 插件("Wscript.Shell")
ws.run("regsvr32 atl.dll /s")
var path = 获取资源路径("rc:")
var ret = 动态库调用(path & "EptReg.dll", "int", "SetDllPathA", "char *", path & "dm.dll", "int", 0)
var dm = 插件("dm.dmsoft")
var ver = dm.Ver()
traceprint("大漠的版本号:" & ver)
dm.SetPath(path)
dm.Moveto(0, 0)
sleep(30)
dm.RightClick()
sleep(30)
结束
功能 启动_热键()
线程ID = 线程开启("执行", "")
结束
功能 终止_热键()
线程关闭(线程ID)
结束
.
.
插件下载：433286131。
群共享。剑仙教程。

hjl123456

学习

yyyyjx

我也在找方法，求教育

feng123144

唉,会多门技术就是不一样.

jimye0526

回复 12楼187144831的帖子

这是人家自己搞的，具体原理我也不知道
而我是根据大漠作者写的dll封装成tc能用的dll
大漠作者限制了3.1235版以下不能用 我也没办法

187144831

回复 6楼jimye0526的帖子

我发现有人用3.1233就能调用  而不是3.1235
怎么回事？

120801625

就当学习了

jimye0526

回复 9楼zdy77233647的帖子

人家要的是免注册，这样可以防部分检测注册表，判断是否注册了大漠的，游戏。

zdy77233647

回复 8楼187144831的帖子

我看到了，TC 封装大漠！直接在初始化自动注册就行了