Показать сообщение отдельно
  #2  
Старый 24.12.2009, 18:17
Аватар для dr. F.I.N.
dr. F.I.N. dr. F.I.N. вне форума
I Like it!
 
Регистрация: 12.12.2009
Адрес: Россия, г. Новосибирск
Сообщения: 663
Версия Delphi: D6/D7
Репутация: 26643
По умолчанию

1)
Код:
a:=random(Round(ListBox1.Items.Count/8))
2)
Код:
a:=random(ListBox1.Items.Count div 8)
Ответить с цитированием