Упругое столкновение шаров - Помощь студентам

DanilTR · 15.02.2016, 20:26

Программный код на Delphi, упругие столкновение шаров. Помогите написать код для проекта.

type_Oleg · 15.02.2016, 21:50

Начинай, поможем.

DanilTR · 16.02.2016, 14:47

Как сделать движение в левую сторону, и плавное?

Serge_Bliznykov · 16.02.2016, 15:22

Цитата:

Сообщение от DanilTR

Как сделать движение в левую сторону, и плавное?

да так же, как и любое другое: нужно вывести рисунок, сделать маленькую паузу, убрать рисунок и вывести его на новом месте.
Делать это удобно в обработчике, назначенном на таймер

p.s. если шар - это у Вас готовый компонент (TShape), то для его перемещения достаточно изменять его координаты (для движения влево, например, достаточно уменьшать Left

Код:

if Shar.Left>0 then
  Shar.Left := Shar.Left - 1;

DanilTR · 16.02.2016, 16:29

Спасибо большое! Кажется понял

15.02.2016, 20:26	#1
DanilTR Регистрация: 15.02.2016 Сообщений: 3	Упругое столкновение шаров Программный код на Delphi, упругие столкновение шаров. Помогите написать код для проекта.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Столкновение шаров надеюсь на вашу помощь	Мария1994	Помощь студентам	2	04.06.2015 17:53
абсолютную упругое столкновение шаров	HACbKA	Помощь студентам	5	30.04.2013 16:28
Столкновение шаров и их исчезновение при этом	iljuase	C# (си шарп)	0	28.11.2012 16:26
Арканоид в Делфи (столкновение шаров)	Scabby	Gamedev - cоздание игр: Unity, OpenGL, DirectX	31	07.03.2010 22:30
Столкновение шаров, Delphi	Absentik	Помощь студентам	0	10.12.2009 18:15

15.02.2016, 21:50	#2
type_Oleg Старожил Регистрация: 02.03.2008 Сообщений: 2,499	Начинай, поможем.

16.02.2016, 14:47	#3
DanilTR Регистрация: 15.02.2016 Сообщений: 3	Как сделать движение в левую сторону, и плавное?

16.02.2016, 16:29	#5
DanilTR Регистрация: 15.02.2016 Сообщений: 3	Спасибо большое! Кажется понял