多对象多线程多窗口多开

bocai7821

\\以下代码是从TC论坛下复制过来的代码,我有点搞蒙,那个大神帮解答一下这个创建多天使对象是用局部变量
\\用局部变量在多功能多空间里怎么调用这个"Ts"天使对象啊
\\如空间调用:

• \\空间 测试对象
  

\\功能 测试1
\\ Ts.xxxxx
\\功能结束

• \\空间结束
• \\如功能调用:
  

\\功能 测试2
\\ Ts.xxxxx
\\功能结束

1空间 TC多开测试

• Ts=array[5]//一个Ts对象对应一个窗口,数组大小定义比窗口数量大一些,以免越界
• 功能 主线程()
• var 返回值,数组大小,i
• 句柄数组=array[1]
• 返回值=系统.枚举("找CALL练习",0)
• //严格来讲 这里需要对,返回值是否为空,来判断是否有开窗口,查找分割符 来判断是否为单开,
• //判断数组大小来判断开启的窗口数量,为了精简易懂,上面都略过.多开的时候记得写上
• 字符串.分割(返回值,"|",句柄数组)
• 数组空间.大小(句柄数组,数组大小)//判断数组大小
• for(i=0;i<数组大小;i++)
• var 参数=句柄数组&","&i//合并参数 窗口句柄和i的值,i的值是为了传递给Ts 这个对象,每开启一次i+1
• //有的朋友就在这里就绑定窗口,其实也是可以的,但我不太喜欢这种做法.
• 线程.开启("TC多开测试.子线程",参数)//开启分线程
• 辅助.等待(1000)//等待一下,避免多个线程同时绑定窗口,导致绑定失败
• endfor
• 功能结束
• 功能 子线程(参数)//接受参数 var 参数=句柄数组&","&i
• var i,窗口句柄,绑定返回值
• 参数数组=array[1]
• 字符串.分割(参数,",",参数数组)//分割出传过来的参数 i和窗口句柄的值
• 窗口句柄=参数数组[0]
• i=参数数组[1]
• Ts=com("ts.tssoft")//创建天使对象
• 绑定返回值=Ts.BindWindow(窗口句柄,"dx","dx","dx",101)//绑定
• 辅助.等待(1000)
• if(绑定返回值==0)
• help.messagebox("绑定失败")
• 返回 假
• else
• //这里表示绑定成功,这后面想干嘛,你干嘛..
• Ts.LockInput(1) //对象记得用Ts,多个线程相互控制窗口就靠这个对象
• Ts.MoveTo(359,239)
• 窗口.激活(窗口句柄)
• Ts.SendString(窗口句柄,"123456")
• 辅助.消息框("绑定成功"&i)
• endif
• 功能结束
• 功能 开始_点击()
• 线程.开启("TC多开测试.主线程","")
• 功能结束
• 空间结束