散尽家产，如何取出多个编辑框或者组合框相同的行内容

小腊肠 · 发表于 2012-5-13 11:29:10

我正在写个时时彩缩水的软件，步骤是先取出每个做号条件到编辑框，再合并到一个编辑框，再取重复，再文本排序。

过程繁琐，软件运行效率比较低，我想请问高手，可否用API帮我写个取出每个编辑框或者是组合框相同的行内容（每一注一行，有多少注就有多少行，一行有3个数字）

速度一定要快，我现在用的这个方法要5秒左右才能把数据处理完~~我希望达到的效果是2秒左右吧~~

小腊肠 · 发表于 2012-5-18 00:02:13

哥哥姐姐们我发现了个用字节集到内存中取重复的例程但是我照搬还是出错了呢我把我写的和例程都发出来，请好心人帮忙看看吧~~~

小腊肠 · 发表于 2012-5-18 11:16:03

源码我已经传到42楼了呀~~~~~~各位大大帮帮我啊

wodetian55 · 发表于 2012-5-20 23:35:49

佚名ka 发表于 2012-5-20 23:31
哥哥麻烦重新把例程传上来吧~~你发的这个貌似有点问题~

自己加下数组的中括号。。。论坛屏蔽的中括号

小腊肠 · 发表于 2012-5-20 23:31:12

wodetian55 发表于 2012-5-20 23:14
这个用时更少，我测试为47毫秒
自己在删除重复的子程序里修改为：

哥哥麻烦重新把例程传上来吧~~你发的这个貌似有点问题~

wodetian55 · 发表于 2012-5-20 23:26:10

佚名ka 发表于 2012-5-20 23:17
哥哥这个是去掉不重复的留下重复的吗？

是的，第一个是只保留重复的数据一次。
70楼的是保留每一个重复数据。

wodetian55 · 发表于 2012-5-20 23:23:14

佚名ka 发表于 2012-5-20 22:41
哥哥还在吗？？？？只差一点就成功了啊~~

如果你需要显示每一条重复的数据
那么按照下面这个来修改（我测试的用时62毫秒）:

.子程序取重复
编辑框2.内容＝保留重复文本 (编辑框1.内容)

.子程序保留重复文本, 文本型
.参数原文本, 文本型
.局部变量节点, 节点
.局部变量全部重复文本组, 文本型, , "0"
.局部变量重复文本, 文本型
.局部变量 i, 整数型
.局部变量原文本组, 文本型, , "0"
.局部变量新文本, 文本型
.局部变量 t

t ＝取启动时间 ()
原文本组＝分割文本 (原文本, #换行符, )
新文本＝ “”
重复文本＝ “”
调试输出 (取数组成员数 (原文本组))
.计次循环首 (取数组成员数 (原文本组), i)
节点.取文本值 (原文本组 , 重复文本)
.如果真 (重复文本 ≠ “”)
加入成员 (全部重复文本组, 重复文本)
.如果真结束
节点.加入属性 (原文本组 , 原文本组 )
.计次循环尾 ()
.计次循环首 (取数组成员数 (全部重复文本组), i)
新文本＝新文本＋全部重复文本组＋ #换行符
.计次循环尾 ()
输出调试文本 (取启动时间 () － t)
返回 (新文本)

小腊肠 · 发表于 2012-5-20 23:17:35

wodetian55 发表于 2012-5-20 23:14
这个用时更少，我测试为47毫秒
自己在删除重复的子程序里修改为：

哥哥这个是去掉不重复的留下重复的吗？

wodetian55 · 发表于 2012-5-20 23:14:24

佚名ka 发表于 2012-5-20 22:41
哥哥还在吗？？？？只差一点就成功了啊~~

这个用时更少，我测试为47毫秒
自己在删除重复的子程序里修改为：

t ＝取启动时间 ()
原文本组＝分割文本 (原文本, #换行符, )
新文本＝ “”
重复文本＝ “”
调试输出 (取数组成员数 (原文本组))
.计次循环首 (取数组成员数 (原文本组), i)
节点.取文本值 (原文本组 , 重复文本)
.如果真 (重复文本 ≠ “”)
新节点.加入属性 (重复文本, “”)
.如果真结束
节点.加入属性 (原文本组 , 原文本组 )
.计次循环尾 ()
新节点.取全部属性名 (新文本组)
.计次循环首 (取数组成员数 (新文本组), i)
新文本＝新文本＋新文本组＋ #换行符
.计次循环尾 ()
输出调试文本 (取启动时间 () － t)
返回 (新文本)

小腊肠 · 发表于 2012-5-20 22:41:32

wodetian55 发表于 2012-5-20 20:59
1600+条数据，处理速度76毫秒

{:3_231:}哥哥还在吗？？？？只差一点就成功了啊~~

小腊肠 · 发表于 2012-5-20 21:54:22

wodetian55 发表于 2012-5-20 20:56
例子，不用看其他的了，效率都没有这个高。

哥哥啊 ~~~~~速度确实没得说非常快不过哥哥啊我要的结果是保留重复的删掉不重复的啊~~你这个例程刚好把重复的删掉了~

wodetian55 · 发表于 2012-5-20 20:59:42

1600+条数据，处理速度76毫秒

wodetian55 · 发表于 2012-5-20 20:56:46

佚名ka 发表于 2012-5-20 18:16
额哥哥能不能给个例程呢？？？？

例子，不用看其他的了，效率都没有这个高。

节点删除重复文本.zip (12.7 KB, 下载次数: 11)

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

[已解决] 散尽家产，如何取出多个编辑框或者组合框相同的行内容