解决delphi随机树不随机的问题。up有分

Question

Randomize
Initializes the random number generator with a random value.
你需要调用Randomize，设定RandSeed来获得比较随机的数字。

Answer 1

Random 须Randomize 和配合使用 delphi 帮助！To initialize the random number generator, add a single call Randomize or assign a value to the RandSeed variable before making any calls to Random.  Randomize（）；
 for i1:=1 to 5 do begin
     n1:=random(data9);
     edit2.text:=edit2.Text+inttostr(n1)+'  ';
   end;
。