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