Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

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

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

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 18.12.2008, 17:19   #1
lacost
Пользователь
 
Регистрация: 25.03.2007
Сообщений: 67
По умолчанию Вращение элипса

Как можно нарисовать элипс под углом?

его оси я рисовал так:
где с1, с2 - его центр, h,h1 - длина большой и малой оси, al - угол относительно ОХ
Код:
  Form.Canvas.MoveTo(c1,c2);
  form.Canvas.LineTo(c1+Round(h*cos(al)),c2-Round(h*sin(al)));

  Form.Canvas.MoveTo(c1,c2);
  form.Canvas.LineTo(c1-Round(h*cos(al)),c2+Round(h*sin(al)));

  x:=90*Pi/180;

  Form.Canvas.MoveTo(c1,c2);
  Form.Canvas.LineTo(c1+Round(h1*cos(al+x)),c2+Round(h1*sin(al-x)));

  Form.Canvas.MoveTo(c1,c2);
  Form.Canvas.LineTo(c1-Round(h1*cos(al+x)),c2-Round(h1*sin(al-x)));
lacost вне форума Ответить с цитированием
Старый 19.12.2008, 08:58   #2
Zeraim
Ra-Ra ?
Форумчанин
 
Аватар для Zeraim
 
Регистрация: 06.03.2008
Сообщений: 286
По умолчанию

А procedure Ellipse(X1, Y1, X2, Y2: Integer); overload;
Не проще ? Сиди себе углы по форме перемещай вот тебе и вращение.
Или тебе нужно построение под конкретным углом ?
Zeraim вне форума Ответить с цитированием
Старый 19.12.2008, 11:09   #3
Arigato
Высокая репутация
СуперМодератор
 
Аватар для Arigato
 
Регистрация: 27.07.2008
Сообщений: 16,219
По умолчанию

Zeraim
Это не то.
Не знаю, есть ли специальная функция для этого. Но есть алгоритм рисования элипса. Берём этот алгоритм и делаем поворот системы координат на нужный угол. Вот и всё.
Arigato вне форума Ответить с цитированием
Старый 19.12.2008, 13:41   #4
alexBlack
Участник клуба
 
Регистрация: 12.10.2007
Сообщений: 1,204
По умолчанию

2lacost
Как-то была тема про SetWorldTransform. Таким же способом можно повернуть и элипс.
alexBlack вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вращение изображения beginner JavaScript, Ajax 5 07.07.2008 23:44
Вращение креста Roberto Помощь студентам 5 03.05.2008 14:07
вращение текста ксона Помощь студентам 3 25.04.2008 10:40
Вращение 5-угольника..? Roberto Помощь студентам 4 17.04.2008 09:38
Вращение луны вокруг Земли [LOL] Помощь студентам 4 19.06.2007 21:14