Скачать: CL | DM;

canvas под углом   Найти похожие ветки 

← →
dar   (2008-08-26 23:29) [0]

рисовку линии делаю так
procedure TForm1.FormPaint(Sender: TObject);
begin
Canvas.Pen.Style:=psSolid;
Canvas.MoveTo(10,20);
Canvas.LineTo(200,80);
но чтоб нарисовать линию под нужным углом приходиться пересчитывать координаты, а нет способа типа Canvas.MoveTo(10,20,25,100); где последнии цифры угол поворота линии и длинна ее?

---

← →
Deltas ©   (2008-08-27 01:47) [1]

Твоя задача называется перевести координаты полярной системы координат в координаты декартовой системы. Напиши соответсвующую процедуру, это не сложно.

---

← →
Deltas ©   (2008-08-27 01:49) [2]

Если конечно знаешь, что такое sin и cos.)

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.008 c