|
|
新命令：
TC命令
命令 说明
rc: 当前TC项目程序资源路径
辅助.注册插件("c:\\dm.dll",真) 注册或卸载插件,第二参数为 真 注册插件,为 假 卸载插件
辅助.是否注册("dm.dmsoft") 通过插件接口,判断插件是否注册
DM命令
dm.Ver() 返回当前插件版本号
dm.Reg("abcdefg","") 注册大漠收费功能
dm.GetBasePath() 获取注册在系统中的dm.dll的路径.
1.注册插件的几种方法
2.让程序自动判断是否注册插件
3.如何注册大漠插件的收费功能
4.什么地方调用自动注册插件功能函数？
示例：
功能 自动注册大漠插件(程序DM版本,trueorfalse,注册码)
//程序DM版本="3.1229"
是否成功=辅助.是否注册("dm.dmsoft")
如果(是否成功)
调试输出("插件已注册")
dm=com("dm.dmsoft")
调试输出("插件已注册,当前使用版本:"&dm.Ver())
如果(程序DM版本!=dm.Ver())
调试输出("插件已注册,插件版本错误重新注册")
是否成功=辅助.注册插件("rc:\\dm.dll",真)
如果(是否成功)
dm=null
dmm=com("dm.dmsoft")
调试输出("插件注册成功,注册版本")
辅助.退出()
如果结束
如果结束
否则
调试输出("插件未注册,开始注册插件")
是否成功=辅助.注册插件("rc:\\dm.dll",真)
如果(是否成功)
调试输出("插件注册成功")
如果结束
如果结束
//程序运行到这个位置表示 插件注册成功了而且版本号也对了
//注册收费大漠
//如果 trueorfalse 表示传入的是 true
如果(trueorfalse)
dm=null
dm=com("dm.dmsoft")
dm_ret = dm.Reg(注册码,"")
如果(dm_ret!=1)
辅助.消息框("注册失败,只能使用免费功能:"&dm_ret)
否则
调试输出("插件收费功能注册成功")
如果结束
如果结束
功能结束
复制代码 |
|
[复制链接]
/2 
发表于 2014-5-2 12:34:30
