|
|
马上加入TC
您需要 登录 才可以下载或查看，没有帐号？立即注册
x
#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 - 记事本'这个窗口句柄")
如果结束
返回 真
功能结束
功能 逻辑型 退出_点击()
辅助.退出()
返回 真
功能结束
空间结束
//空间结束语句
版主放的代码，无论改什么，运行后，都是没有反映，不是太新的手，看的懂，可就是无反映。求高手解答，是哪个版本有问题吗
|
|
/2 
发表于 2012-10-11 16:42:38
收藏
支持
反对
楼主
