 |
|
Модераторы: Snowy, MetalFan, bems, Poseidon |
 
|
|
Как выбрать случайное число из списка??? 
| ZNatasha |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 2 Регистрация: 4.2.2008 Репутация: нет Всего: нет |
Как выбрать число случайным образом не из диапозона, а из конкретных чисел. Например 2, 4 , 9 нужно выбирать случайным образом одно из чисел...
|
|||
|
||||
Загрузка ...
| lukas |
|
|||
 Опытный  Профиль Группа: Участник Сообщений: 771 Регистрация: 23.2.2007 Репутация: 3 Всего: 15 |
Это сообщение отредактировал(а) lukas - 4.2.2008, 21:21 -------------------- http://code.google.com/p/orionphp/ - opensource скриптовой язык Orion (аналог PHP) для freepascal/delphi. |
|||
|
||||
| ZNatasha |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 2 Регистрация: 4.2.2008 Репутация: нет Всего: нет |
Это два разных способа или один продолжение другого???
|
|||
|
||||
| THandle |
|
|||
 Хранитель Клуба  Награды: 1 Профиль Группа: Админ Сообщений: 3639 Регистрация: 31.7.2007 Где: Moscow, Dubai Репутация: 50 Всего: 372 |
ZNatasha, это функция и её вызов
 |
|||
|
||||
| VICTAR |
|
|||
|
Эксперт Профиль Группа: Участник Сообщений: 1108 Регистрация: 6.10.2006 Репутация: 10 Всего: 80 |
lukas, нумерация в массивам, как правильно начинается с нуля. Правильней было бы написать
Упс.. сорри я написал тоже самое. Плохо посмотрел твой код =) Это сообщение отредактировал(а) VICTAR - 4.2.2008, 21:58 |
|||
|
||||
| lukas |
|
|||
|
Опытный Профиль Группа: Участник Сообщений: 771 Регистрация: 23.2.2007 Репутация: 3 Всего: 15 |
это не особо меняет дело....
-------------------- http://code.google.com/p/orionphp/ - opensource скриптовой язык Orion (аналог PHP) для freepascal/delphi. |
|||
|
||||
| Shaggy |
|
|||
 Новичок Профиль Группа: Участник Сообщений: 37 Регистрация: 2.5.2007 Где: г.Ижевск Репутация: 2 Всего: 5 |
RandomFrom
|
|||
|
||||
| Akella |
|
|||
 Творец Профиль Группа: Модератор Сообщений: 18485 Регистрация: 14.5.2003 Где: Корусант Репутация: 8 Всего: 329 |
ZNatasha, А список в каком виде? Может у тебя TStringList?
|
|||
|
||||
| valerchi |
|
|||
 Бывалый Профиль Группа: Участник Сообщений: 163 Регистрация: 27.5.2008 Где: Геническ Репутация: нет Всего: нет |
Подскажите новичку, почему генератор случайных чисел (random) в delphi генерирует вроде бы случайные числа, но стоит закрыть программу, а потом её открыть, включить и начать заново генерировать случайные числа, как сразу стаёт видно, что эти числа начинают повторяться в таком порядке, в котором они были при первом запуске программы. Вот отрывок из программы:
|
|||
|
||||
| PsiMagistr |
|
|||
|
Опытный Профиль Группа: Участник Сообщений: 479 Регистрация: 31.12.2009 Репутация: 1 Всего: 1 |
Для того, чтобы числа каждый оказывались разными необходимо один раз использовать оператор Randomize. Использовать достаточно один раз, чаще всего в событии загрузки формы.
Это сообщение отредактировал(а) PsiMagistr - 13.7.2010, 17:51 -------------------- "Арфы нет? Возьмите бубен! Ребята, будем жить!" (с) "В бой идут одни старики" --- "ИЕ" - один из самых сумасшедших браузеров в нашей галактике. |
|||
|
||||
| valerchi |
|
||||||
|
Бывалый Профиль Группа: Участник Сообщений: 163 Регистрация: 27.5.2008 Где: Геническ Репутация: нет Всего: нет |
То есть вместо "n:=random (18595558800);" пишем "n:=randimize (18595558800);"? Я так понял? Добавлено через 10 минут и 36 секунд
А точнее randomize? |
||||||
|
|||||||
| THandle |
|
|||
|
Хранитель Клуба Награды: 1 Профиль Группа: Админ Сообщений: 3639 Регистрация: 31.7.2007 Где: Moscow, Dubai Репутация: 50 Всего: 372 |
valerchi, нет. Посмотри в справке/нет про Randomize. Тебе просто нужно вызвать её один раз в начале работы программы. А потом все оставить как было.
Вызов - как вызов процедуры без параметров. |
|||
|
||||
| valerchi |
|
|||
|
Бывалый Профиль Группа: Участник Сообщений: 163 Регистрация: 27.5.2008 Где: Геническ Репутация: нет Всего: нет |
[QUOTE=valerchi,13.7.2010, 17:23]
Всё, большое спасибо, я разобрался  |
|||
|
||||
| valerchi |
|
|||
|
Бывалый Профиль Группа: Участник Сообщений: 163 Регистрация: 27.5.2008 Где: Геническ Репутация: нет Всего: нет |
Я хотел спросить, если кто знает, сколько случайных чисел (1 - 0) функция random выдаёт в секунду?
|
|||
|
||||
| ~FoX~ |
|
|||
 НЕ рыжий!!! Профиль Группа: Участник Клуба Сообщений: 2819 Регистрация: 8.10.2003 Где: Зеленоград Репутация: 5 Всего: 68 |
Сколько попросишь... Число генерируеться алгоритмом на основе счетчика тактов процессора... Это сообщение отредактировал(а) ~FoX~ - 18.7.2010, 09:31 --------------------  …множественность никогда не следует полагать без необходимости… |
|||
|
||||
|
|
| Правила форума "Delphi: Для новичков" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Для новичков | Следующая тема » |
[ Время генерации скрипта: 0.0931 ] [ Использовано запросов: 21 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |