Форум программистов
 
Расширенный поиск
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Мультимедиа в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail



Ответ
 
Опции темы
Старый 12.03.2011, 21:16   #1
lylyfam
Новичок
 
Регистрация: 12.03.2011
Сообщений: 1
Репутация: 10
По умолчанию анимация в делфи

Помогите пожалуйста сделать такую анимацию, чтобы объект двигался по косинусу. Использую классы.
lylyfam вне форума   Ответить с цитированием
Старый 12.03.2011, 21:29   #2
Serge_Bliznykov
МегаМодератор
СуперМодератор
 
Регистрация: 09.01.2008
Сообщений: 23,010
Репутация: 5118
По умолчанию

Цитата:
Использую классы.
да хоть потоки...

Давайте так - Вы даёте код, где Ваш объект движется по прямой, и Вам показывают, как сделать, чтобы он двигался по косинусоиде..

А вообще, по сути, ничего сложного:
в цикле
- стираете объект по старым координатам.
- вычисляете новую координату, увеличивая x на очень малое число (шаг анимации),
для каждого x считаете y := cos(x) * МасштабныйКоэффициент;
- рисуете объект по новым координатам round(x), round(y)
делаете небольшую паузу
конец цикла
Serge_Bliznykov вне форума   Ответить с цитированием
Старый 14.05.2011, 18:55   #3
OlegPrograming5
Пользователь
 
Регистрация: 12.01.2009
Сообщений: 42
Репутация: 7
По умолчанию

Вместо паузы и цикла можно использовать таймер. Если координата X (или Y, как вам нужно по задаче) больше определённого значения, вы просто выключаете таймер. (Enabled:=False).
OlegPrograming5 вне форума   Ответить с цитированием
Ответ



Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
анимация в Делфи Htenez Общие вопросы Delphi 0 16.12.2010 10:37
анимация serj-07 Общие вопросы Delphi 17 10.01.2010 11:39
Анимация nimf Общие вопросы Delphi 6 07.08.2009 10:21
Анимация BuTeK1 Паскаль 0 19.01.2009 01:30
Анимация SanekIrk Общие вопросы Delphi 11 08.08.2008 15:24




13:30.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.

купить трафик


как улучшить посещаемость, а также решения по монетизации сайтов, видео и приложений

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru