高手们！你们取随机数时是用什么函数的！？都是用Randomize;Random（）吗？但这个是相对随机的！

Question

如题：
请各位说说你们用什么函数取随机数的！

Answer 1

在窗体的onCreate事件中写：
Randomize;在你需要的地方用Random();

Answer 2

楼上，请看清题目呀！！我不是不知道怎么用Radom（）；；

Answer 3

同意小菜鸟说的:我一般都用MOD作种子

Answer 4

var
  SysTime: TsystemTime;
  ms: integer;
begin
  ...
  GetSystemTime(SysTime);
  ms := SysTime.wMilliseconds;
  //对ms用自己的函数产生一个适合自己的数字即可
  ...
end;

Answer 5

一般对当前系统时钟做随机数。var
  st: SYSTEMTIM;
  dw: DWORD;  //秒数
begin
  getlocaltime(@st);
  //把st转化对标准时间的秒数，相当于C下的Time_t
  //恐怕要自己写个函数转化一下
  dw := SysTimeToSec(@st);  //SysTimeToSec自己要写的函数
  
  Randomize;
  Random(dw);
  ..
  ..
end;

Answer 6

一般都是用random（）来产生一个相对比较大的数的随机数的，我想大概没有什么办法取得绝对随机数吧。呵呵，有了告诉我一声。[email protected]

Answer 7

有个在线赌博网站用的就是这个初始化纸牌序列，结果被人同步服务器时间后算出种子，然后所有的序列都……出来了（第一圈的牌还是要看一下的），作弊都省了。案例见IBM（要么另一家大安全公司）的教学网站。