Тема: Snake на Delphi
Показать сообщение отдельно
  #2  
Старый 02.01.2011, 20:19
lmikle lmikle вне форума
Модератор
  
Регистрация: 17.04.2008
Сообщения: 8,015
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию
В таймере, перед собственно перемещением:

Код:
Snake.Direction := Random(4) + 1;
Ответить с цитированием