要获得一个随机函数,可是不知道怎么办,我用的是Delphi。清高手指点,谢谢!

解决方案 »

  1.   


       Randomize;
       Random(100) ; // 返回 0 .. 100 间的数值
      

  2.   

    补充一下吧Random(100)取不到100的,最多能取到99
      

  3.   

    在每次使用Random函数前最好,初始化随机种子数。用Randomize,最用是不使随机的数字顺序相同。Initializes the random number generator with a random value.UnitSystemCategoryrandom number routinesprocedure Randomize;
      

  4.   

    Randomize;
    Random(100) 
    记着一定要先Randomize;!
    呵呵,计算机质子兄,小弟总是跟在你屁股后面捡漏:)
      

  5.   

    俺再补充两句:如果想让"随机数"更加“随机”一些,可以用上面的方法得到“随机数”以后跟当前的鼠标位置和上一次俺键时间和ascii值等等具有“随机特点”的数据进行运算。再吹两句,"世界上没有随机概念"之我见:1,世界上的物质是一定的(无论你是否能够知道一共有多少,他们各是什么);
    2,物质的变化规律是一定的(无论你是否能够都知道这些规律);
    3,物质以自己的规律变化着,无论你是否能够知道其中的规律;
    4,所谓"意识"的作用,也是由于生物电的作用,这些生物电是很多基本的化学反应的产品;
    5,我们能够预测一个已知规律的化学反应的结果,所有化学反应,无论你知不知道其中的规律,其结果都是精确注定的。
    6,这个世界就是一个大的反应池,无时无刻不再进行着各自的“化学反应”;综上,世界发展的每一秒都是自这个世界诞生之日起就已经注定的,就象我们能够预测一个化学反应的结果一样,如果存在上帝,那么他可以告诉我们未来的样子。
    可见世界上没有“随机”,只有“不知道如何预测”。