如题

解决方案 »

  1.   

    这是从Delphi自带帮助中找到的所有随机函数。
    一般看参数就会用了RandG functionGenerates random numbers with Gaussian distribution.Random functionGenerates random numbers within a specified range.RandomFrom functionReturns a randomly selected element from an array.Randomize procedureInitializes the random number generator with a random value.RandomRange functionReturns a random integer from a specified range.RandSeed variableRandSeed stores the built-in random number generator's seed.
      

  2.   

    需要一段点击button在表单中随即产生1—30的整数的代码!!!
      

  3.   

    引用Math单元文件。ShowMessage(IntToStr(RandomRange(1, 30)));