Вниз
Скачать: 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.011 c
8-74851
sad
2002-09-05 08:02
2002.12.23
Полигон в Teechart


4-75050
pag77
2002-11-07 19:51
2002.12.23
выключить комп под XP


14-74954
Дмитрий К.К.
2002-11-29 09:31
2002.12.23
Чтение новостных групп


3-74591
ioSan
2002-12-05 01:00
2002.12.23
Помогите написать запрос без вложенного подзапроса.


3-74557
ton2
2002-12-04 12:00
2002.12.23
Запись Null-значения в поле boolean




   Наверх