DELPHI 7 学习---------摇号

目的： 随机产生一个数字

主要内容：如果要随机产生一个数字， 使用Random （N）来完成。作用是产生0...N-1的一个数字

本文用的是其衍生函数：strutils.RandomFrom(NUMS);  //NUMS：Array[0..9] of string=(‘0’,...'9');返回数组中的某一个值。

代码：

  Randomize;//必须使用该函数进行初始化，不然，重复性高
  Label1.Caption:=strutils.RandomFrom(NUMS);

 

 

相关函数：

RandG  -------Generates random numbers with Gaussian distribution.

Random -----Generates random numbers within a specified range.

RandomFrom ------Returns a randomly selected element from an array.

Randomize ---------Initializes the random number generator with a random value.

RandomRange --------Returns a random integer from a specified range.

RandSeed variable----RandSeed stores the built-in random number generator's seed.

 

代码下载： http://download.csdn.net/detail/tzgltzgm/5017474