Вниз
Скачать: CL | DM;

Полигон в Teechart   Найти похожие ветки 

← →
sad ©   (2002-09-05 08:02) [0]

Здравствуйте, подскажите, пожалуйста, как нарисовать полигон в Teechart по заданным координатам.
Заранее спасибо


← →
MBo ©   (2002-09-05 08:11) [1]

procedure TForm1.Button1Click(Sender: TObject);
var p:array[0..3] of tpoint;
i:integer;
begin
for i:=0 to 3 do begin
p[i].x:=50+random(200);
p[i].y:=50+random(200);
end;
Chart1.Canvas.PolygonWithZ(p,0);
end;


← →
sad ©   (2002-09-05 10:44) [2]

Почему-то не могу никак вычислить координаты точки пересечения осей TeeChart"а чтобы поместить полигон в эту точку.

Определяем отступ от края слева и снизу
x:=trunc( Chart1.Width*(Chart1.MarginLeft/100))
y:=trunc( Chart1.Height*((100-Chart1.MarginBottom)/100))
и че-то абсолютно не совпадают точки


← →
MBo ©   (2002-09-05 13:02) [3]

см. свойства TChartAxis


← →
sad ©   (2002-09-06 15:57) [4]

Спасибо. точки нашел.
Однако мой полигон меньше чем надо.. я так понимаю нужны некие коэффициенты коррекции ...жестко-то их задать можно..но хочется
по-красивее..


← →
MBo ©   (2002-09-06 16:18) [5]

>меньше чем надо
????


← →
sad ©   (2002-09-09 08:21) [6]

Если ориентироваться на оси TeeСhart (координаты одни и те же (абс.значения), а полигон выходит меньше размером



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

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



Память: 0.46 MB
Время: 0.012 c
1-74812
Again
2002-12-10 17:22
2002.12.23
RadioButton


14-74985
Mitrofan
2002-12-03 19:42
2002.12.23
Чем можно создать PDF документ с родными сердцу буквами.


3-74555
NONAME00
2002-12-04 12:04
2002.12.23
Ошибка с ADO


3-74612
Lnstr
2002-12-04 17:31
2002.12.23
Как прочитать Blob и разобрать побайтно


1-74630
bkv
2002-12-10 16:42
2002.12.23
сколько пикселов займет срока в 10 символов?




   Наверх