Описание |
Delphi функция RandomRange генерирует произвольное целое число ( integer ) в пределах диапазона RangeFrom и RangeTo.
Она обеспечивает более удобную версию функции Random модуля System.
Оба используют псевдослучайную последовательность чисел 232 значений. Каждый раз, когда Вы выполняете вашу программу, сгенерированные значения будут одни и те же, если Вы не установите генератор в произвольную часть последовательности, используя функции Randomize или RandSeed.
|
|
Похожие команды |
Random Генерирует случайное целое число или число с плавающей запятой
Randomize Устанавливает генератор случайного числа на следующее значение
RandSeed Устанавливает генератор случайного числа на следующее значение
| |
|
Пример кода : Генерация случайных чисел в очень маленьком диапазоне |
var
i : Integer;
begin // Показ 5 случайных чисел в диапазоне от 652 до 656
for i := 1 to 5 do
ShowMessage('Случайное число : '+IntToStr(RandomRange(652, 656)));
end;
|
Случайное число = 652
Случайное число = 652
Случайное число = 655
Случайное число = 652
Случайное число = 653
|
|