Тема: Randomize
Показать сообщение отдельно
  #1  
Старый 28.11.2011, 22:36
hackteam hackteam вне форума
Прохожий
 
Регистрация: 13.11.2011
Сообщения: 9
Репутация: 10
По умолчанию Randomize

Здравствуйте, можно ли генерировать рандомное число и при повторе процедуры что бы число не повторялось ?

Код:
i:=random(5);
if (i<>0) and (i=1) and (i<>2) and (i<>3) and (i<>4) and (i<>5)then
RadioGroup1.Visible:=true;

Вот у меня рандом осушиствлён таким образом. Спасибо за внимание
Ответить с цитированием