TC官方合作论坛

标题: 怎么获得程序的运行状态 动态显示在窗口上? [打印本页]

作者: 狂奔的蜗牛    时间: 2012-10-4 14:16
标题: 怎么获得程序的运行状态 动态显示在窗口上?
下面是自己写的 答题器 我就是想怎么能知道程序运行到哪一步了 然后显示在窗口上呢~
==========================================================
#import "dm.dmsoft" dm
空间 客户
整型 线程1
字符型 IP地址,端口,状态
功能 逻辑型 任务1()
   
    循环(真)
        
        int 返回值,窗口句柄,是否成功,intX,intY
      
        字符型  发送返回值,返回结果,内容
        
        是否成功=图像.找图(0,0,2000,2000,"rc:111.bmp",#000000,0.9,0,intX,intY)
        
        //是否成功=dm.FindPic(0,0,2000,2000,"RC:111.bmp","000000",0.9,0,intX,intY)
        
        if(是否成功<0)
            
            辅助.等待(200)
            
            辅助.消息框("没有找到图片")
            
        else
            
            辅助.等待(2*1000)
            
            窗口句柄=dm.FaqCapture(498,490,625,540,50,0,0)  //获取图片
            
            
            
            返回结果=dm.FaqSend("IP地址:端口",窗口句柄,2,60*1000)    //发送图片
            
            
            
            返回值=字符串.返回字符(返回结果,0)  
            
            
            
            发送返回值=字符串.移除(返回结果, 3,真)//获取“答案:”后面的字符串
            
            
            
            鼠标.移动(688,528) //鼠标移动验证码输入框
            
            
            
            鼠标.左键单击(2)
            
            
            
            窗口句柄=窗口.鼠标所在窗口句柄()
            
            
            
            窗口.发送字符串(窗口句柄,发送返回值) //向窗口发送验证码
            
            
            
            鼠标.移动(593,584)   //鼠标移动确定按钮
            
            
            
            鼠标.左键单击(1)
            
            辅助.等待(2000)
            
        endif
        
        
    循环结束
   
   
    返回 真
   
功能结束

作者: shine宝宝    时间: 2012-10-4 14:20
据说要用插件
作者: 狂奔的蜗牛    时间: 2012-10-4 14:21
回复 2楼shine宝宝的帖子

那据说要啥插件~~
作者: shine宝宝    时间: 2012-10-4 14:30
不知道
作者: feng123144    时间: 2012-10-4 14:32
糖果的弟弟吗?真像啊.
作者: 狂奔的蜗牛    时间: 2012-10-4 14:36
回复 4楼shine宝宝的帖子

很纠结啊 那有没点开始后 开始按钮就变停止的字样~~
作者: shine宝宝    时间: 2012-10-4 14:39
点击事件里写 如果现在按钮文本 是开始 就设置成 停止    要么就 设成开始0.0
作者: 狂奔的蜗牛    时间: 2012-10-4 14:56
回复 7楼shine宝宝的帖子

哦哦  我试试哦 没写过呢
作者: 狂奔的蜗牛    时间: 2012-10-4 15:04
回复 7楼shine宝宝的帖子

哥 不会写唉 帮个忙呗 怎么改
=================================
功能 逻辑型 开始_点击()
   
线程1=线程.开启("客户.任务1","")
  
    返回 真
   
功能结束
作者: pest    时间: 2012-10-8 05:15
不知道




欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1