Работа с компонентом ТChart

← →
Gari (2002-09-18 09:37) [0]

Доброе утро уважаемые господа. У меня вопрос с которым мне тяжело справится, я надеюсь мне кто нибудь поможет. Вопрос такой. Каким образом в компоненте TChart построить график уравнения x*x+y*y=r*r (тобишь окружность). Заковырка в том что TChart строит только прямую последовательность. Помогите если знаете.

← →
MBo (2002-09-18 09:48) [1]

Series Shape не подойдет?
или
procedure TForm1.Chart1AfterDraw(Sender: TObject);
begin
chart1.canvas.Ellipse(40,40,200,200);
end;

← →
MBo (2002-09-18 09:57) [2]

procedure TForm1.Button1Click(Sender: TObject);
var i:integer;
begin

Series1.XValues.Order:=loNone;
Series1.YValues.Order:=loNone;

for i:=1 to 90 do begin
series1.addxy(100+trunc(100*cos(4*Degtorad(i))),100+trunc(100*sin(4*Degtorad(i))));
end;
end;

← →
Gari (2002-09-18 10:16) [3]

Вообще цель моей задачи, рисовать не окружность а кривую сложной формы. Одному значению X может соответствовать несколько y. То что предложил уважаемый MBo я попробовал, очень красиво, но что это вообще должно было быть.

← →
Gari (2002-09-18 10:19) [4]

В догонку с благодарностью MBo. То что вы предложили великолепно подходит. Если не трудно разьясните в чем фокус.

← →
MBo (2002-09-18 11:39) [5]

фокус выделен - значения при поступлении в список НЕ упорядочиваются

Работа с компонентом ТChart Найти похожие ветки