找了三天三夜了!求TC中可用的大漠3.1233**版! - TC官方合作论坛

功能后台绑定MAT()
var hwnd, dm_ret
//初始化
if(m_dmIsBin)
消息框("大漠插件已经绑定","提示")
return 0
end
if (m_dm==null)
m_dm=com("Ts.TsSoft")
traceprint(m_dm.Ver())
//注册, 否则无法绑定
// h3505831989cde1f3749944b80f2cf1afd9f06d4b0a, qq401446551f1d754286bd86db811a21053d6bf2a9, xifengjta7d9905826bd99983f15749288fe18f2
//vb5679817a5beb36d72c9e972c0918d9d2f2bfb, hncdbai6543eeb75d7504e24b6983d1decc1240, h3505831989cde1f3749944b80f2cf1afd9f06d4b0a
dm_ret=m_dm.Reg("ancuicui61dac250279723c18e8bf7ee79db7cb0","")
if(dm_ret != 1)
消息框("插件收费注册失败, 无法加载本功能"&dm_ret,"严重错误")
return 0
else
dm_ret = m_dm.DmGuard(1, "phide") // 1为成功
if (dm_ret !=1)
消息框("开启保护盾失败-错误代码：" & dm_ret )
else
调试输出("开启保护盾成功")
end
end
end
m_dm.SetPath("f:\\Cache\\MediaCache\\")
//获得句柄
m_hwnd = cint(编辑框获取文本("TXT参数"), 1)
if(m_hwnd==0)
m_hwnd = 获得MAT窗口()
traceprint("自动查找句柄")
end
traceprint("当前绑定句柄"&m_hwnd)
if(!m_hwnd)
消息框("无法取得MAT句柄, 确定MAT是否开启","提示")
return 0
end
//绑定
//dm_ret = m_dm.BindWindow(m_hwnd,"dx","dx","dx",1)
var varDisplay, varMouse, varKeypad, varPublic
varDisplay = "normal"
//varMouse = "dx.mouse.input.lock.api2|dx.mouse.input.lock.api3|" & "dx.mouse.position.lock.api|dx.mouse.position.lock.message|dx.mouse.state.api|dx.mouse.state.message|dx.mouse.api|dx.mouse.focus.input.api|dx.mouse.focus.input.message|dx.mouse.clip.lock.api|dx.mouse.input.lock.api|dx.mouse.cursor"
varMouse = "dx.mouse.position.lock.api|dx.mouse.position.lock.message|dx.mouse.state.api|dx.mouse.state.message|dx.mouse.api|dx.mouse.focus.input.api|dx.mouse.focus.input.message|dx.mouse.clip.lock.api|dx.mouse.input.lock.api"
varKeypad = "dx.keypad.state.api|dx.keypad.api|dx.keypad.input.lock.api"
varPublic = "dx.public.active.api|dx.public.active.message"
dm_ret = m_dm.BindWindowEx(m_hwnd, varDisplay, varMouse, varKeypad, varPublic,1)
if(!dm_ret)
//消息框("绑定失败, 错误代码: " & m_dm.GetLastError(),"提示")
消息框("绑定失败","提示")
//m_dmIsBin=true
return 0
else
消息框("绑定成功", "提示")
m_dmIsBin=true
return 1
end
结束

复制代码