【求帮忙】遍历读取文本速度太慢

qianlanzf

求助有没有读取文本1秒最少一千行的方法啊？
用遍历我试了下，只是1000行啊我等的花儿都谢了。。这可怎么办啊？

milai5201

qianlanzf 发表于 2014-10-11 17:18
代码

遍历读取文件内容需要的时间不长，识别字的时间就有点长了，难怪你说等到花儿谢了 你这又是找图又是找字的，循环次数多 没加延迟 单开还好，多开的话很废CPU的

milai5201

直接遍历 1秒 差不多1000行了 别加延迟  你贴代码上来

qianlanzf

milai5201 发表于 2014-10-11 16:59
直接遍历 1秒 差不多1000行了 别加延迟  你贴代码上来

1.     变量 内容数组,数组长度,内容
   
2.     文件内容 = 文件.读文件("rc:aa.txt")//先读取内容
   
3.     字符串.分割(文件内容,"\r\n",内容数组)//然后区分内容
   
4.     数组空间.大小(内容数组,数组长度)//查看里面有多少的数据
   
5.     循环(真)
   
6.         dm_ret = dm.FindPic(0,0,800,600,"考验.bmp","050505",1.0,0,intX,intY)
   
7.         如果(intX >= 0)
   
8.             调试输出("真")
   
9.             遍历(i = 0;i < 数组长度;i ++)
   
10.                 辅助.等待(10)
    
11.                 如果(i <= 数组长度)
    
12.                     字符串.分割(内容数组[i],"=",内容)
    
13.                     题目 = dm.Ocr(267,186,571,275,"f0ece8-302c28",1.0)
    
14.                     标签.设置文本("测试","题目"&题目)
    
15.                     如果(题目 == 内容[0])
    
16.                         dm_ret = dm.FindStr(248,275,587,435,内容[1],"f0ece8-302c28",1.0,intX,intY)
    
17.                         如果(dm_ret>=0)
    
18.                             dm.MoveTo(intX,intY)
    
19.                             dm.LeftClick()
    
20.                         如果结束
    
21.                         句柄=线程.获得当前句柄()
    
22.                         线程.关闭(句柄)
    
23.                     如果结束
    
24.                 如果结束
    
25.             遍历结束
    
26. 循环结束

复制代码

代码

qianlanzf

milai5201 发表于 2014-10-11 17:37
遍历读取文件内容需要的时间不长，识别字的时间就有点长了，难怪你说等到花儿谢了 你这又是找图又是找字 ...

求指教，这代码该怎么优化呢？只要速度快起来就行

qianlanzf

milai5201 发表于 2014-10-11 17:37
遍历读取文件内容需要的时间不长，识别字的时间就有点长了，难怪你说等到花儿谢了 你这又是找图又是找字 ...

那我，是不是这样子就可以了，把找图识别字的代码分离出来每次只读取一次，就可以了？

qianlanzf

milai5201 发表于 2014-10-11 17:37
遍历读取文件内容需要的时间不长，识别字的时间就有点长了，难怪你说等到花儿谢了 你这又是找图又是找字 ...

高手看东西就是不一样，改了之后遍历的速度飞一样哈哈