![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Новичок
Джуниор
Регистрация: 30.08.2010
Сообщений: 0
|
![]()
Движение. Написать программу движения небольшой фигуры (крестик) вдоль отрезка P1P2. Фигура непрерывно перемещается от точки P1 к точке P2 и обратно. Форма программы содержит две кнопки: Motion - начало движения, Cancel - завершение программы.
Рекомендации. Объект представляется набором точек. Изображение выводится на компонент PaintBox, Image или любой другой, обладающий свойством Canvas. Движение имитируется перерисовкой фигуры через небольшие интервалы времени Dt в новых положениях, отстоящих от предыдущих на малую величину (Dx, Dy). Предыдущее изображение стирается повторной закраской цветом фона. Перерисовку изображений производить в обработчике OnTimer с использованием однородных координат и матрицы переноса. Матрица переноса формируется в обработчике FormCreate или в обработчике команды Motion, перемещение объекта производится умножением его вектора однородных координат на матрицу переноса. Кнопка Motion запускает таймер. Включить в программу типы Vector, Matrix и процедуру умножения вектора на матрицу. Для вывода изображения использовать методы MoveTo, LineTo и другие класса Canvas. Алгоритм вывода изображений: 1. Закрасить текущее изображение цветом фона 2. Перенести объект в новое положение (умножить вектор однородных координат каждой точки объекта на матрицу переноса) 3. Если центр объекта достиг границы отрезка P1P2 а. Сделать новым положением объекта соответствующую границу в. Изменить направление движения объекта (поменять знаки параметров Dx, Dy в матрице переноса) 4. Вывести изображение объекта в новом положении Сделать надо на Delphi Срок до 30.04.12 08:00 почта: fede.06@mail.ru Последний раз редактировалось Ferz27; 29.04.2012 в 07:53. |
![]() |
![]() |
![]() |
#2 |
Новичок
Джуниор
Регистрация: 30.08.2010
Сообщений: 0
|
![]()
Человек найден
|
![]() |
![]() |
![]() |
Опции темы | Поиск в этой теме |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Изменение кода для ускорения движения фигуры. | 7vlad37 | Microsoft Office Excel | 7 | 28.07.2011 14:52 |
Задача на расчёт движения. Заяц бежит вдоль заданной прямой. Собака — за зайцем. Найти траекторию собаки. | AndrewSkull | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 06.06.2011 20:13 |
Прграммка: движение крестика вдоль отрезка | G16 | Фриланс | 3 | 04.11.2010 19:57 |
Написать программу на Паскале (построение фигуры). | Sania92 | Помощь студентам | 3 | 24.05.2010 22:53 |