关于随机函数的问题??急!

Question

我用了随机函数random
sj:=random(adoquery1.RecordCount)
但是每次从新进总是一样的随机数（adoquery1.recordcount值不变的话）怎么办呀？？
急。

Answer 1

因为随机数需要初始化加上Randomize;

Answer 2

Randomize;
或:srand((integer) time(nil));

Answer 3

在每一次产生随机记录前加上这个函数　Randomize;始初化随机数的方法。祝：身体健康，答案和分数同样重要：）

Answer 4

srand((integer) time(nil));

Answer 5

先加产生随机种子Randomize;
就行了

Answer 6

種子植入一次便可,我試下在一個for循環里不斷植入並產生隨機數,狂植入會重覆的...