Полигон в 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]

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

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

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

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