Тема: Рандомизация
Показать сообщение отдельно
  #7  
Старый 26.10.2012, 22:14
Аватар для DeOne
DeOne DeOne вне форума
Новичок
  
Регистрация: 24.09.2012
Сообщения: 86
Версия Delphi: 7
Репутация: 10
По умолчанию
Цитата:
Сообщение от angvelem
Код:
  if Memo1.Lines.Count > 0 then
    y := Random(Memo1.Lines.Count);
на выходе (y) номер случайной строки.
Огромное спасибо
__________________
Только учусь Delphi...
Ответить с цитированием