Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Работа с компонентом ТChart [D5, WinME]


Gari ©   (2002-09-18 09:37:00) 

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


MBo   (2002-09-18 11:39:00) [1]

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


Gari   (2002-09-18 10:19:00) [2]

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


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

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


MBo   (2002-09-18 09:57:00) [4]

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;


MBo   (2002-09-18 09:48:00) [5]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо