求解决脚本问题 一直测试不成!

qsw296062081

求好心人,求老师,解决!

龍飛

    辅助.写配置("ERP下料","状态",单选框.获得状态("单选框0"),"C:\\TC配置.ini")
    辅助.写配置("ERP下料","状态",单选框.获得状态("单选框1"),"C:\\TC配置.ini")
    辅助.写配置("ERP下料","数量",编辑框.获得文本("编辑框0"),"C:\\TC配置.ini")
    辅助.写配置("ERP下料","数量",编辑框.获得文本("编辑框1"),"C:\\TC配置.ini")
改成

    辅助.写配置("ERP下料","数量",编辑框.获得文本("编辑框0"),"C:\\TC配置.ini")
    辅助.写配置("ERP下料","数量1",编辑框.获得文本("编辑框1"),"C:\\TC配置.ini")
    状态 = 单选框.获得状态("单选框0")
    如果(状态)
        辅助.写配置("ERP下料","状态",1,"C:\\TC配置.ini")
    否则
        辅助.写配置("ERP下料","状态",0,"C:\\TC配置.ini")
    如果结束
   
    状态 = 单选框.获得状态("单选框1")
    如果(状态)
        辅助.写配置("ERP下料","状态",1,"C:\\TC配置.ini")
    否则
        辅助.写配置("ERP下料","状态",0,"C:\\TC配置.ini")
    如果结束

---------------------------------------------------------------------------
    配置内容=辅助.读配置("编辑框0","数量","C:\\TC配置.ini")
    编辑框.设置文本("编辑框0",配置内容)
    配置内容=辅助.读配置("编辑框1","数量","C:\\TC配置.ini")
    编辑框.设置文本("编辑框1",配置内容)
改成

    配置内容=辅助.读配置("ERP下料","数量","C:\\TC配置.ini")
    编辑框.设置文本("编辑框0",配置内容)
    配置内容=辅助.读配置("ERP下料","数量1","C:\\TC配置.ini")
    编辑框.设置文本("编辑框1",配置内容)

a837198

自己去摸索查看

qsw296062081

老师 不行啊 单选框 和编辑框不能保存数量

龍飛

这个是啥..直接贴代码出来更好一些.这样大家都能看到.下载下来多麻烦呀.

qsw296062081

空间 ERP下料
//默认空间

线程1,线程2




功能 单选框0_点击()
    //这里添加你要执行的代码
    mm=编辑框.获得文本("编辑框0")
    如果(mm=="")
        辅助.消息框("请输入下料循环次数")
        返回 真
    如果结束
    遍历(i=0;i<mm;i++)
        
        超级键盘.按键(40,1)
        辅助.等待(350)
        超级键盘.按键(37,3)
        
        
        超级键盘.按下(17)
        超级键盘.按键(67,1)
        超级键盘.弹起(17)
        辅助.等待(350)
        
        超级键盘.按下(164)
        超级键盘.按键(9,1)
        超级键盘.弹起(164)
        辅助.等待(350)
        
        超级键盘.按键(112,1)
        辅助.等待(350)
        辅助.写入剪切板("13108")
        辅助.等待(350)
        超级键盘.按键(9,14)
        辅助.等待(350)
        
        
        超级键盘.按下(17)
        超级键盘.按键(86,1)
        超级键盘.弹起(17)
        辅助.等待(350)
        超级键盘.按键(9,1)
        辅助.等待(350)
        
        超级键盘.按下(164)
        超级键盘.按键(9,1)
        超级键盘.弹起(164)
        辅助.等待(350)
        
        超级键盘.按键(39,2)
        辅助.等待(350)
        
        
        超级键盘.按下(17)
        超级键盘.按键(67,1)
        超级键盘.弹起(17)
        辅助.等待(350)
        
        超级键盘.按下(164)
        超级键盘.按键(9,1)
        超级键盘.弹起(164)
        辅助.等待(350)
        
        超级键盘.按键(9)
        辅助.等待(350)
        //工艺 否
        如果(复选框.获得状态("复选框0",真))
            辅助.等待(350)
            超级键盘.按键(9,2)
            辅助.等待(350)
            超级键盘.按键(32,1)
            辅助.等待(350)
            超级键盘.按键(9,1)
            辅助.等待(350)
            辅助.写入剪切板("B005")
            辅助.等待(350)
        如果结束
        
        辅助.等待(350)
        鼠标.移动(1366,123)
        辅助.等待(350)
        鼠标.左键单击(1)
        辅助.等待(1800)
        超级键盘.按键(13,1)
        辅助.等待(350)
        
        鼠标.左键单击(1)
        辅助.等待(350)
        超级键盘.按键(13,1)
        辅助.等待(350)
        
        
        图片X坐标,图片Y坐标,图像序号
        图像序号=图像.找图(1086,566,356,180,"rc:\\1.bmp",#000000,1.0,0,图片X坐标,图片Y坐标)
        如果(图像序号)
            辅助.等待(350)
            鼠标.移动(图片X坐标,图片Y坐标)
            辅助.等待(350)
            鼠标.左键单击(1)
            辅助.等待(350)
            超级键盘.按键(13,1)
            辅助.等待(350)
            超级键盘.按键(13,1)
            辅助.等待(350)
            
            鼠标.移动(261,156)
            辅助.等待(350)
            鼠标.右键单击(1)
            辅助.等待(350)
            超级键盘.按键(38,1)
            辅助.等待(350)
            超级键盘.按键(13,1)
            辅助.等待(350)
            
            超级键盘.按下(164)
            超级键盘.按键(9,1)
            超级键盘.弹起(164)
            辅助.等待(350)
            超级键盘.按键(39,1)
            辅助.等待(350)
            
            超级键盘.按下(17)
            超级键盘.按键(86,1)
            超级键盘.弹起(17)
        否则
            辅助.等待(350)
            鼠标.移动(886,350)
            辅助.等待(350)
            鼠标.左键单击(1)
            辅助.等待(350)
            鼠标.移动(1361,154)
            辅助.等待(350)
            鼠标.左键单击(1)
            辅助.等待(350)
            
            超级键盘.按下(164)
            超级键盘.按键(9,1)
            超级键盘.弹起(164)
            辅助.等待(350)
            超级键盘.按键(39,1)
            辅助.等待(350)
            辅助.写入剪切板("无结构")
            辅助.等待(350)
        如果结束
        
        
        
        
        
        
        
        
    遍历结束  
   
功能结束


功能 单选框1_点击()
    //这里添加你要执行的代码
    辅助.等待(350)
    mm=编辑框.获得文本("编辑框1")
    如果(mm=="")
        辅助.消息框("请输入委外循环次数")
        返回 真
    如果结束
    遍历(i=0;i<mm;i++)
        辅助.等待(350)
        超级键盘.按下(17)
        超级键盘.按键(67,1)
        超级键盘.弹起(17)
        辅助.等待(350)
        
        超级键盘.按下(164)
        超级键盘.按键(9,1)
        超级键盘.弹起(164)
        辅助.等待(350)
        
        超级键盘.按键(32,1)
        辅助.等待(350)
        超级键盘.按键(13,2)
        辅助.等待(350)
        
        
        
        
        如果(复选框.获得状态("复选框1"))
            辅助.等待(350)
            辅助.写入剪切板("P0332")
            辅助.等待(350)
            如果(复选框.获得状态("复选框2"))
                辅助.等待(350)
                辅助.写入剪切板("P0328")
                辅助.等待(350)
               
                如果(复选框.获得状态("复选框3"))
                    辅助.等待(350)
                    辅助.写入剪切板("P0193")
                    辅助.等待(350)
                    
                如果结束
               
            如果结束
        如果结束
        辅助.等待(350)
        超级键盘.按键(13,1)
        辅助.等待(350)
        
        超级键盘.按下(17)
        超级键盘.按键(86,1)
        超级键盘.弹起(17)
        辅助.等待(350)
        
        超级键盘.按键(13,2)
        辅助.等待(350)
        
        超级键盘.按下(164)
        超级键盘.按键(9,1)
        超级键盘.弹起(164)
        辅助.等待(350)
        
        超级键盘.按键(40,1)
        辅助.等待(350)
        
        
        
        
    遍历结束
功能结束


功能 热键0_热键()
    //这里添加你要执行的代码
    如果(单选框.获得状态("单选框1"))
        辅助.等待(350)
        线程1=线程.开启("ERP下料.单选框1_点击","")
        辅助.等待(350)
        
        如果(单选框.获得状态("单选框0"))
            辅助.等待(350)
            线程2=线程.开启("ERP下料.单选框0_点击","")
            辅助.等待(350)
            
        如果结束
    如果结束
功能结束

功能 热键1_热键()
    //这里添加你要执行的代码
    线程.关闭(线程1)
    线程.关闭(线程2)
功能结束





功能 按钮0_点击()
    //这里添加你要执行的代码
    辅助.写配置("ERP下料","状态",单选框.获得状态("单选框0"),"C:\\TC配置.ini")
    辅助.写配置("ERP下料","状态",单选框.获得状态("单选框1"),"C:\\TC配置.ini")
    辅助.写配置("ERP下料","数量",编辑框.获得文本("编辑框0"),"C:\\TC配置.ini")
    辅助.写配置("ERP下料","数量",编辑框.获得文本("编辑框1"),"C:\\TC配置.ini")
   
    状态 = 复选框.获得状态("复选框0")
    如果(状态)
        辅助.写配置("下料","工艺",1,"C:\\TC配置.ini")
    否则
        辅助.写配置("下料","工艺",0,"C:\\TC配置.ini")
    如果结束
   
    状态 = 复选框.获得状态("复选框1")
    如果(状态)
        辅助.写配置("委外","豫纺",1,"C:\\TC配置.ini")
    否则
        辅助.写配置("委外","豫纺",0,"C:\\TC配置.ini")
    如果结束
   
    状态 = 复选框.获得状态("复选框2")
    如果(状态)
        辅助.写配置("委外","飞键",1,"C:\\TC配置.ini")
    否则
        辅助.写配置("委外","飞键",0,"C:\\TC配置.ini")
    如果结束
   
    状态 = 复选框.获得状态("复选框3")
    如果(状态)
        辅助.写配置("委外","金教",1,"C:\\TC配置.ini")
    否则
        辅助.写配置("委外","金教",0,"C:\\TC配置.ini")
    如果结束
   
功能结束


功能 热键0_失去焦点()
    //这里添加你要执行的代码
    返回键码1,返回功能键码1
    热键.销毁("热键0")
    热键.注册("热键0")
    热键.获得("热键0",返回键码1,返回功能键码1)
    辅助.写配置("热键0","返回键码1",返回键码1,"C:\\TC配置.ini")
    辅助.写配置("热键0","返回功能键码1",返回功能键码1,"C:\\TC配置.ini")
功能结束


功能 热键1_失去焦点()
    //这里添加你要执行的代码
    返回键码2,返回功能键码2
    热键.销毁("热键1")
    热键.注册("热键1")
    热键.获得("热键1",返回键码2,返回功能键码2)
    辅助.写配置("热键1","返回键码2",返回键码2,"C:\\TC配置.ini")
    辅助.写配置("热键1","返回功能键码2",返回功能键码2,"C:\\TC配置.ini")
   
功能结束



功能 初始化()
    //这里添加你要执行的代码
    状态=辅助.读配置("单选框0","状态","C:\\TC配置.ini")
    如果(状态==1)
        单选框.选中("单选框0",真)
        单选框.选中("单选框1",假)
    否则
        单选框.选中("单选框0",假)
        单选框.选中("单选框1",真)
    如果结束
   
    状态 = 辅助.读配置("下料","工艺","C:\\TC配置.ini")
    如果(状态 == 1)
        复选框.选中("复选框0",真)
    否则
        复选框.选中("复选框0",假)
    如果结束
   
    状态 = 辅助.读配置("委外","豫纺","C:\\TC配置.ini")
    如果(状态 == 1)
        复选框.选中("复选框1",真)
    否则
        复选框.选中("复选框1",假)
    如果结束
   
    状态 = 辅助.读配置("委外","飞键","C:\\TC配置.ini")
    如果(状态 == 1)
        复选框.选中("复选框2",真)
    否则
        复选框.选中("复选框2",假)
    如果结束
   
    状态 = 辅助.读配置("委外","金教","C:\\TC配置.ini")
    如果(状态 == 1)
        复选框.选中("复选框3",真)
    否则
        复选框.选中("复选框3",假)
    如果结束
   
    返回键码1=辅助.读配置("热键0","返回键码1","C:\\TC配置.ini")
    返回功能键码1=辅助.读配置("热键0","返回功能键码1","C:\\TC配置.ini")
    如果(返回键码1!=""&&返回功能键码1!="")
        热键.设置("热键0",返回键码1,返回功能键码1)
    如果结束
   
    返回键码2=辅助.读配置("热键1","返回键码2","C:\\TC配置.ini")
    返回功能键码2=辅助.读配置("热键1","返回功能键码2","C:\\TC配置.ini")
    如果(返回键码2!=""&&返回功能键码2!="")
        热键.设置("热键1",返回键码2,返回功能键码2)
    如果结束
    热键.注册("热键0")
    热键.注册("热键1")
    配置内容=辅助.读配置("编辑框0","数量","C:\\TC配置.ini")
    编辑框.设置文本("编辑框0",配置内容)
    配置内容=辅助.读配置("编辑框1","数量","C:\\TC配置.ini")
    编辑框.设置文本("编辑框1",配置内容)
功能结束

空间结束
//空间结束语句

编辑框 和单选框 不能 保存

龍飛

qsw296062081 发表于 2015-1-28 17:05
空间 ERP下料
//默认空间

老长了.....
按钮0_点击()这里的写配置有问题
单选框也要和复选框这样写
你的编辑框1的写配置会覆盖编辑框0的写配置.注意文本是否为空值
你的读写配置写得太乱了.

qsw296062081

热键 有问题啊

2645572175

{:soso__10169062262133571330_1:}