请教关于随机数的问题

Question

在delphi下，怎样产生随机数，需要给种子吗？先谢了

Answer 1

Randomize; //初始化随机种子（没有这句得到的随机数序列是一样的），调用Random之前执行一次就好。  TmpInt := Random(4);//得到从[0，4)区间的随机数，注意有0，没有4

Answer 2

Randomize;这个是设定种子值为当前的系统时间，如果你要自己设定种子的话可以用RandSeed:=(integer类型数)来自己手动设定种子值

Answer 3

//产生随机号码
Randomize;
q:=Random(10);
//随机产生0-9整数
Application.ProcessMessages;
//处理Windows消息，属简单多线程

Answer 4

Randomize;
q:=Random(10);
//随机产生0-9整数
Application.ProcessMessages;
//处理Windows消息，属简单多线程