Главная страница
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.01 c
3-1207291974
Альберт
2008-04-04 10:52
2008.10.05
Поиск дубликатов


2-1219924155
workbench
2008-08-28 15:49
2008.10.05
ftp-клиент, IdFTP


2-1219852683
TStas
2008-08-27 19:58
2008.10.05
Сохранение из OleContainer а


15-1218679559
Slider007
2008-08-14 06:05
2008.10.05
С днем рождения ! 14 августа 2008 четверг


2-1219779477
Jimmy
2008-08-26 23:37
2008.10.05
Курсор мыши