Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2011.10.16;
Скачать: CL | DM;

Вниз

Непонятки с TChart   Найти похожие ветки 

 
Maxim-us   (2011-06-24 16:08) [0]

Здравствуйте мастера!
Не пинайте за детский вопрос. Изучаю компонент TChart. Кинул на форму два чарта, в Chart1 надо выводить один график, в Chart2 другой(совмещать на одном чарте нельзя). В Chart1 строю график функции так:Series1.AddXY(x,y,"",clblue) (значения x и y вычисляю и подставляю в цикле по формуле). Все хорошо рисует в Chart1 до момента когда надо вывести график второй функции в Chart2. Тогда прога вылетает с ошибкой. Вывожу второй график так:Series2.AddXY(x,y,"",clred). Как правильно вывести два графика в разные чарты чтобы не было ошибки?


 
SQLEXPRESS   (2011-06-24 16:30) [1]

код давайте, это все разговоры


 
Maxim-us   (2011-06-24 16:41) [2]

{1-ый график}
for t:=0 to 12 do
 begin
 x:=3,5*t+12;
 y:=7,2*t-3;
 Series1.AddXY(x,y,"",clblue);
 end;
{2-ой график}
for t:=13 to 24 do
 begin
 x:=7,2*t-3;
 y:=3,5*t+12;
 Series2.AddXY(x,y,"",clred);
 end;
При попытке приписать явно 2-у чарту Chart2.Series2.AddXY(x,y,"",clred) ошибка компиляции "Неизв.идентификатор Series2", хотя серию во втором чарте так и обозвал Series2


 
Ega23 ©   (2011-06-24 16:41) [3]


> Тогда прога вылетает с ошибкой.


Код вывода в студию.


 
Ega23 ©   (2011-06-24 16:42) [4]


> хотя серию во втором чарте так и обозвал Series2


Series2 - это Name или Caption?


 
SQLEXPRESS   (2011-06-24 16:48) [5]

показывай код на создание серий
и текст ошибки


 
SQLEXPRESS   (2011-06-24 17:15) [6]

работает

uses Series;
procedure TForm1.btn1Click(Sender: TObject);
var
 S1, S2 : TLineSeries;
 i: Integer;
begin
  s1 := TLineSeries.Create(nil);
  s1.Clear;
  s1.ParentChart := cht1;

  s2 := TLineSeries.Create(nil);
  s2.Clear;
  s2.ParentChart := cht2;

  for i := 0 to 10 do
  begin
    s1.AddXY(i, Random(10), "", clRed);
    s2.AddXY(i, Random(10), "", clBlue);
  end;

end;


 
Maxim-us   (2011-06-24 17:24) [7]

>SQLEXPRESS
cht1 и cht2 компоненты Chart1 и Chart2 с измененными Names ?


 
SQLEXPRESS   (2011-06-24 17:43) [8]

да


 
Maxim-us   (2011-06-24 17:51) [9]

>SQLEXPRESS
Спасибо большое! Все заработало! :)



Страницы: 1 вся ветка

Текущий архив: 2011.10.16;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.006 c
1-1268895548
Kolan
2010-03-18 09:59
2011.10.16
Как узнать что значит Event в сообщении?


2-1309024072
eXAAAXe
2011-06-25 21:47
2011.10.16
Максимальное разрешение экрана.


2-1309007537
Maxim-us
2011-06-25 17:12
2011.10.16
TChart style


2-1308936747
vegarulez
2011-06-24 21:32
2011.10.16
как правильно вставить декларацию процедуры?


2-1308783149
Германн
2011-06-23 02:52
2011.10.16
Ошибка при удалении контролов