Головна сторінка
Top.Mail.Ru Яндекс.Метрика
Форум: "Media";
Поточний архів: 2002.12.23;
Завантажити: [xml.tar.bz2];

Вниз

Полігон в 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;
починати
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 вся гілка

Форум: "Media";
Поточний архів: 2002.12.23;
Завантажити: [xml.tar.bz2];

наверх









Пам'ять: 0.56 MB
Час: 0.04 c
7-75025
Metallica
2002-07-28 14:07
2002.12.23
Запуск програми при завантаженні Windows.


14-74967
початківець програмер
2002-12-03 11:19
2002.12.23
Сподіваюся на вашу допомогу


1-74688
Gitler
2002-12-13 14:06
2002.12.23
система


3-74582
Сантёр
2002-12-04 18:10
2002.12.23
RxDBGrid


3-74563
Vladk
2002-12-04 13:17
2002.12.23
SP





африкаанс албанський арабська вірменин азербайджанець баскський білоруський болгарська каталонський Китайська (спрощене письмо) Китайський традиційний) хорватський чеська данську мову нідерландський Ukranian естонець Філіппінська фінську мову французький
галісійська грузинський німецький грецький гаїтянський креольський давньоєврейську хінді угорський ісландський індонезієць ірландський італійський японський корейський латиська литовець македонець малайський мальтійський норвежець
перс полірування португальська румунський російська сербський словацький словенський іспанська суахілі шведську мову тайський турецька український урду в'єтнамський валлійський ідиш бенгальський боснійський
кебуано есперанто гуджараті хауса хмонг ігбо яванський каннада кхмерская Лао латинь маорі маратхі монгольський непальська панджабі сомалійський тамільська телугу йоруба
зулуський
Англійська Французький Німецький Італійський Португальська Русский Іспанська