Random()
在Delphi中，有一随机函数，是这样定义的：
function Random [ ( Range: Integer) ];

其中，参数Range为一整数，
该函数返回值也为整数，其范围为：
0< =Random(Range)< Range   (指定Range)
0< =Random< 1   (不带参数Range)

Random（）用来取得随机数，不过如果多运行几次会发现每次取得的随机数都是一样的。这是因为系统的随机种子没有改变，每次运行都是用同一个随机种子取的数。Ramdomize用来改变随机种子，这样每次的随机数就不同了。
例如：
Randomize; 重新生成随机种子 (任何随机数生成都和随机种子有关) 
Random(X); 生成一个随机整数，范围在0-X之间，包括0;