Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Уменьшение длины...


Landgraph ©   (2004-07-21 17:20:00) 

Поворачиваю точку вокруг начала координат:
X=X*cos(Angle)-Y*sin(Angle);
Y=Y*sin(Angle)+Y*cos(Angle);

В результате получается, что длина отрезка 0(0;0)-А(Х,У) с каждым поворотом уменьшается =(

Х,У - переменные 4-х байтовые, переход к 8-байтовым изменений не дает

Как решить, подскажите пожалуйста =) Спасибо.


Magikan   (2004-07-22 11:14:00) [1]

Ты угол в радианах задаешь?


MegaVolt   (2004-07-22 10:49:00) [2]

На сколько я знаю если ты рисуешь на канве то LineTo(чбн) рисует линию не включая точку (x,y) может в этом проблема?


Наверх

Титульная страница Поиск, карта сайта Написать письмо