再提一次:用程序实现组合生成(变量较多时!!!!!!该怎么改进) (300分)

cdl · 2001-02-18

给个例子吧!要源代码,用delphi.
例如有N个变量,每个变量可取1,0,或是-1,用程序有规律的列出所有可能的情况!
要求能处理N比较大的情况(使用Memo控件只能处理N<=9)

YunEr · 2001-02-18

没有太明白您的问题：
不过用布尔型数组，可实现大量的1和0
下面是示例：
type
c = -1..1;
var
a : array [1..10] of boolean;
b : array [1..10] of c;

Seoul_BJ · 2001-02-18

to yuner:
　　近来可好！

Reboot · 2001-02-18

用StringGrid吧

YunEr · 2001-02-18

To seoul_BJ:好呵，你呢？忙吗？有空多联系

Reboot · 2001-02-18

cdl: 程序发给你啦，我用的是StringGrid，生成树的算法速度比较快。
给StringGrid的Cell赋值比较慢，你可能用ListBox效果好一点，你自己去
改进吧

cdl · 2001-02-28

reboot,谢谢你的程序,不过算倒N=10就死机了,还是处理不了N较大时的情况,怎么办?

Reboot · 2001-02-28

其实生成组合速度很快，关键是这些组合的保存很慢。
放入TStringGrid时，N>10要等很久。
TListBox的Items放不下3^10个。
再帮你试试保存到文件

悲酥清风 · 2001-04-26

cdl:请自己提前或结束帖子，谢谢合作。

kidneyball · 2001-04-27

把结果保存到文件，然后再从文件中提取需要的部分

luyear · 2001-10-12

cdl：如果要继续请提前，否则请结束问题，谢谢

creation-zy · 2002-07-23

请您参考：
http://www.delphibbs.com/delphibbs/dispq.asp?lid=1008308
http://www.delphibbs.com/delphibbs/dispq.asp?lid=999248

（不知是哪位兄台把这个帖子转到这个分类来，谢谢了

）

张剑波 · 2002-07-31

多人接受答案了。