Разное
Облака / Clouds
The bast cloud service
Get 20 GB free!!!
Support WebDav.
Show more >>
time-tested cloud storage
Support WebDav.
Последние книги
Самое популярное
Все бесплатно
Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.
Навигация
Вопросы
Число строкой с предстоящими нулями
Категория: Текст и строки
Категория: Текст и строки
Создать индекс для таблицы ABS (Absolute Database)
Категория: Базы данных
Категория: Базы данных
Как получить дату создания файла
Категория: Файловая система
Категория: Файловая система
Список ошибок BDE
Категория: Базы данных
Категория: Базы данных
Undo в memo
Категория: Компоненты
Категория: Компоненты
Упаковать BD Accuracer
Категория: Базы данных
Категория: Базы данных
Получение списка всех сетевых дисков из Delphi
Категория: Интернет и Сети
Категория: Интернет и Сети
Компоненты ToolBar и PageScroller
Категория: Компоненты
Категория: Компоненты
Определение размера файла
Категория: Файловая система
Категория: Файловая система
Упаковка таблиц в BDE
Категория: Базы данных
Категория: Базы данных
Delphi - Справочник: RandomRange
RandomRange
|
function RandomRange ( const RangeFrom, RangeTo : Integer ) : Integer; |
Функция (Unit Math)
|
Генерирует произвольное число в пределах введённого диапазона
|
Описание:
|
Delphi функция RandomRange генерирует произвольное целое число ( integer ) в пределах диапазона RangeFrom и RangeTo. Она обеспечивает более удобную версию функции Random модуля System. Оба используют псевдослучайную последовательность чисел 232 значений. Каждый раз, когда Вы выполняете вашу программу, сгенерированные значения будут одни и те же, если Вы не установите генератор в произвольную часть последовательности, используя функции 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 |