Delphi-Help

Описание

function RandomRange ( const RangeFrom, RangeTo : Integer ) : Integer;

Delphi функция RandomRange генерирует произвольное целое число ( integer ) в пределах диапазона RangeFrom и RangeTo.

Она обеспечивает более удобную версию функции Random модуля System.

Оба используют псевдослучайную последовательность чисел 2³² значений. Каждый раз, когда Вы выполняете вашу программу, сгенерированные значения будут одни и те же, если Вы не установите генератор в произвольную часть последовательности, используя функции 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

Примечание