Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.10.05;
Скачать: 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 вся ветка

Текущий архив: 2008.10.05;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.015 c
15-1218022106
Palladin
2008-08-06 15:28
2008.10.05
Покупка Delphi 6


15-1218549829
{RASkov}
2008-08-12 18:03
2008.10.05
Платежные терминалы?


15-1218659598
Германн
2008-08-14 00:33
2008.10.05
Помогите, кто может! Сдать зачёт.


2-1219941100
Greebanyi 2bus
2008-08-28 20:31
2008.10.05
Clock


15-1218153220
Украинец
2008-08-08 03:53
2008.10.05
Delphi и Gecko