TC官方合作论坛
标题:
TC注册大漠,求助,好心人或版主给我发下文件压缩下给我qq350094
[打印本页]
作者:
zhuwei123
时间:
2012-10-14 10:11
标题:
TC注册大漠,求助,好心人或版主给我发下文件压缩下给我qq350094
#import "dm.dmsoft" dm
//实现接口连接,dm当做一个当前大漠接口ID的对象名称,名字随意只要与下面调用保持一致即可,
//不管以下脚本要开多少线程来操作接口ID的功能方法,该接口ID只需定义一次即可,无需定义多次.
空间 COM组件使用方法
功能 逻辑型 大漠线程函数(字符型 参数)
整型 窗口句柄,是否成功
窗口句柄=转换.字符型转整型(参数,0)//把传入我们线程的字符串类型的:窗口句柄转换为整型的窗口句柄
如果(窗口句柄>0)//判断句柄是否合法
是否成功=dm.BindWindow( 窗口句柄 ,"dx","dx","dx",0)//绑定这个窗口句柄
如果 (是否成功==1)
辅助.消息框("绑定成功")//如果返回1表示绑定成功
否则
辅助.消息框("绑定失败")//否则表示绑定失败
如果结束
如果结束
返回 真
功能结束
功能 逻辑型 开始_点击()
//下面通过接口实现大漠的一些功能,当实现这个接口时,程序自动创建大漠,使用完后自动释放大漠
//dm这个大漠对象创建成功后,线程开启后调用的dm对象的所有大漠方法,只对当前线程有效.
整型 窗口句柄=dm.FindWindow("","1.txt - 记事本") //查找系统包含"记事本"标题的所有窗口句柄
如果( 窗口句柄 > 0)//判断是否找到了窗口
字符型 句柄=转换.整型转字符型(窗口句柄)//把窗口句柄转换为字符型方便线程.开启的时候方便传递参数
//传递一个窗口句柄字符串给开启的线程函数
线程.开启("COM组件使用方法.大漠线程函数",句柄)
否则
辅助.消息框("没找到'1.txt - 记事本'这个窗口句柄")
如果结束
返回 真
功能结束
功能 逻辑型 退出_点击()
辅助.退出()
返回 真
功能结束
空间结束
//空间结束语句
我写完功能弄上,都弄上表示没反映,求版主或好心人帮助新人一把,谢谢了,把这个程序发给我qq350094
作者:
陌上青衣。
时间:
2012-10-14 10:39
插件专区----集合贴----适合新手.
http://bbs.tyuyan.com/thread-13818-1-1.html
欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)
Powered by Discuz! X3.1