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