为什么读上千行文本就很卡了？

aismy · 发表于 2011-9-11 15:26:46

本帖最后由 aismy 于 2011-9-11 16:05 编辑

.版本 2
文件号＝打开文件 (取运行目录 () ＋ “\内容.txt”, #改读, )
.计次循环首 (到数值 (编辑框txt读取行数.内容), x1)
文本＝读入一行 (文件号)
移动读写位置 (文件号, #现行位置, －取文本长度 (文本) － 2)
删除数据 (文件号, 取文本长度 (文本) ＋ 2)
移到文件首 (文件号)
已读文本＝文本＋ #换行符＋已读文本
.计次循环尾 ()
关闭文件 (文件号)
置剪辑板文本 (已读文本)

精简下代码：上面读取1000行需要5秒以上，请问如何做可以让他更快，用了启动线程的！

爱的凌迟 · 发表于 2011-9-11 15:26:47

是的啊一千行你分成五个线程不是就更快了吗,,你又不是不会分线程.呵呵多加个编辑框,设定线程数就好了

爱的凌迟 · 发表于 2011-9-11 15:33:21

你在数据处理量大的地方加上一句
处理事件()
试试

aismy · 发表于 2011-9-11 15:47:53

我爱莫能助发表于 2011-9-11 15:33
你在数据处理量大的地方加上一句
处理事件()
试试

谢谢，我试了在循环里面加还是一样

更正一下：读1000行需要20秒不会卡，是很慢，我标题写错了抱歉

aismy · 发表于 2011-9-11 15:55:33

我把编辑框改为了变量，现在速度提高到10秒完成，不过也有点慢，我看用两个循环试试

aismy · 发表于 2011-9-11 16:03:35

现在循环内只保留：

.版本 2

文本＝读入一行 (文件号)
移动读写位置 (文件号, #现行位置, －取文本长度 (文本) － 2)
删除数据 (文件号, 取文本长度 (文本) ＋ 2)
移到文件首 (文件号)
已读文本＝文本＋ #换行符＋已读文本

读1000行速度提升到5秒了。。。请问这样还有什么问题吗？谢谢

爱的凌迟 · 发表于 2011-9-11 16:12:38

看不出有什么问题来了

爱的凌迟 · 发表于 2011-9-11 16:13:56

想更快你就多分几个线程出来同时运算

aismy · 发表于 2011-9-11 16:23:27

我爱莫能助发表于 2011-9-11 16:13
想更快你就多分几个线程出来同时运算

运算结果再放在一起是这意思吧？感谢了

qq793359277 · 发表于 2011-9-11 16:26:16

正常现象一大碗饭你总不可能一口吃完{:3_226:}

		自动登录	找回密码
密码			注册

[已解决] 为什么读上千行文本就很卡了？

最佳答案

评分

评分