Показать сообщение отдельно
  #2  
Старый 11.01.2012, 03:07
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

1. Доделать - это если ты делал.
2. Да тут в основном математика. Вспоминай формулы вычисления углов в прямоугольном треугольнике. Треугольник получается из точек (x,y - координаты конца луча) 0,0 - x,y - x,0. Ну и далее просто считай тангенс угла и делай arctan для него (нужен, скорее всего, модуль Math).
Ответить с цитированием