求大神指点多开错误

tao201309

脚本运行提示    var 参数=窗口句柄数组&","&i  //  错误 ：类型不匹配




空间 多开实验
//默认空间
变量 多线程句柄=数组[10],参数组合=数组[1],窗口句柄数组=数组[],
变量 dm=数组[10]
//开始按钮_点击操作
功能 开始_点击()
    多开实验.开启线程()
功能结束
功能 开启线程()
    遍历(i=0;i<列表框.得到个数("列表框0");i++)
        var 参数=窗口句柄数组&","&i  //合并参数 窗口句柄和i的值,i的值是为了传递给DM 这个对象,每开启一次i+1
        多线程句柄=线程.开启("多开实验.绑定窗口",参数)
        辅助.等待(1500)
    遍历结束
功能结束
功能 绑定窗口(传入参数)
    字符串.分割(传入参数,",",参数组合)
    窗口句柄=参数组合[0]
    j=参数组合[1]
    dm[j]=com("dm.dmsoft")
    dm[j].SetPath(辅助.获取资源路径("rc:"))
    是否成功=dm[j].BindWindow(窗口句柄,"dx","windows","windows",0)
    如果(是否成功==1)
        标签.设置文本("标签2","绑定成功,继续运行")  
        线程.开启("多开实验.完成任务",j)
    否则
        标签.设置文本("标签2","绑定失败,请重新启动脚本")  
    如果结束
   
功能结束
功能 完成任务()
    intX,intY
    循环(真)
        dm.FindStr(0,0,2000,2000,"完成任务","f5d8be-303030|eac395-303030|9f754d-303030",1.0,intX,intY)
        辅助.等待(500)
        如果(intX>0)
            dm.MoveTo(intX,intY)
            辅助.等待(500)
            dm.LeftClick()
        否则
        如果结束
        辅助.等待(500)
    循环结束
功能结束
功能 是否有重复句柄(句柄)
    遍历(i=0;i<列表框.得到个数("列表框0");i++)
        如果(列表框.获得文本("列表框0",i)==句柄)
            返回 (真)
        如果结束
    遍历结束
    返回 (假)
功能结束
功能 热键3_热键()
    窗口句柄=参数组合[0]
    句柄=窗口.鼠标所在窗口句柄()
   如果(!多开实验.是否有重复句柄(句柄))
       数组空间.增加(窗口句柄数组,句柄,1)
        列表框.增加文本("列表框0",句柄)
   否则
      辅助.消息框("抱歉，这个窗口已经加入了。")
   如果结束
功能结束
//退出按钮_点击操作
功能 退出_点击()
   
    辅助.退出()
功能结束

空间结束

龍飛

改成
参数 = 窗口句柄数组[i]&","&i

龍飛

1. 功能 开始_点击()  
   
2. 多开实验.开启线程()  
   
3. 功能结束  
   
4. //----------开启线程----------\\
   
5. 功能 开启线程()  
   
6. 遍历(i=0;i<列表框.得到个数("列表框0");i++)  
   
7. 多线程句柄[i]=线程.开启("多开实验.绑定窗口",i)
   
8. 辅助.等待(1500)  
   
9. 遍历结束  
   
10. 功能结束  
    
11. //----------绑定窗口----------\\
    
12. 功能 绑定窗口(j)  
    
13. dm[j]=com("dm.dmsoft")  
    
14. dm[j].SetPath(辅助.获取资源路径("rc:"))  
    
15. ret = dm[j].BindWindow(窗口句柄[j],"dx","dx","dx",0)
    
16. 如果(ret==1)
    
17. 如果结束  
    
18. 功能结束

复制代码

看看这样能否帮助到你

tao201309

谢谢