Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.11.14;
Скачать: CL | DM;

Вниз

Как нарисовать дугу?   Найти похожие ветки 

 
Shaman2002 ©   (2002-11-05 18:41) [0]

Люди подскажите как нарисовать дугу по трем точкам в PaintBox.
Точнее говоря полэлипса под углом к оси ОХ. Известны координаты трех вершин.
Буду очень признателен за помощь.


 
MBo ©   (2002-11-06 06:25) [1]

Дугу окружности по трем точкам нарисовать можно, а вот для эллипса трех точек недостаточно - нужно либо 4 точки, либо еще какой-то параметр эллипса, например, эксцентриситет или (что проще) отношение большой и малой полуосей


 
ZEE ©   (2002-11-06 09:13) [2]

На счет "полэлипса" - не знаю, но вообще кривые (по трем точкам) я рисую так:

var aPts:array[0..4]of TPoint;
...
aPts[0]:=Point(x1,y1);
aPts[1]:=Point(x1,y1);
aPts[2]:=Point(x2,y2);
aPts[3]:=Point(x3,y3);
aPts[4]:=Point(x3,y3);
Image1.Canvas.Brush.Color:=clBlack;
Image1.Canvas.FillRect(Rect(0,0,0,0));
// сам не знаю как эта штука влияет на прорисовку,
// но почему-то без нее не работает
Image1.Canvas.Brush.Style:=bsClear;
PolyBezier(Image1.Canvas.Handle,aPts,4);
...


Может конечно не совсем правильно, но кто умеет лучше - пусть кинет в меня правильным кодом :)



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

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

Наверх




Память: 0.47 MB
Время: 0.018 c
1-45897
UNI_DeMoN
2002-11-06 02:33
2002.11.14
ОООЧЕнь нужны алгоритмы для разбора предложения на предикаты


3-45707
lejik
2002-10-23 10:39
2002.11.14
Хэндл DataSet


3-45688
Korwin
2002-10-27 17:03
2002.11.14
DBLookup


1-45834
Fog
2002-11-05 12:44
2002.11.14
SetLength для параметра...


1-45961
Zuvom
2002-11-04 13:31
2002.11.14
Удаление файла