Вниз
Скачать: 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.014 c
3-74623
Nickb hmkgfkuuyhgkl
2002-12-04 04:36
2002.12.23
Как сделать, чтобы в DBgrid при скролинге НЕ перемешался курсор Б


3-74579
cutter-pro
2002-12-04 16:24
2002.12.23
Delphi и Excel в одну постель???


1-74828
dm
2002-12-11 12:07
2002.12.23
Delphi + Prolog = ?


1-74841
don_dampster
2002-12-11 16:37
2002.12.23
unrar.dll


3-74569
Oleg_Em
2002-12-04 13:41
2002.12.23
вызов функции в запросе ....




   Наверх