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

Вниз

Tchar и его графики   Найти похожие ветки 

 
FIL-23   (2010-02-14 17:44) [0]

procedure TForm1.Button2Click(Sender: TObject);
var
line:TLineSeries;
l:integer;
y:real;
begin
line:= TLineSeries.Create(nil);
line.Clear;
line.ParentChart := Chart4;

    for l:=-25 to 25 do
      begin
      y:=sin(2*pi*25*(0+4*l*0.00025));
      line.AddXY(l,y,"")
      end;

end;


вот тут я привел кодик ... в котором я создаю график и присваеваю его определенному tchart .. а если мен надо 100 графиков создать ? мне надо чтоли 100 имен в переменых определять? .. народ кто знает как можно зациклить данную процедуру.... чтобы имя само создавалось???


 
Сергей М. ©   (2010-02-14 18:48) [1]


> чтобы имя само создавалось?


Какое "имя" ?
Где в процедуре оно у тебя "не само создается" ?


 
azatsh   (2010-02-14 19:04) [2]

IzotermChart.AddSeries(TLineSeries.Create(Self)); // добавляет новую серию (график)
IzotermChart.Series[IzotermChart.SeriesCount-1].AddXY(); // добавление точки в последнюю серию (последний график)


 
azatsh   (2010-02-14 19:07) [3]

IzotermChart.AddSeries(TLineSeries.Create(Self)); // добавляет новую серию (график)
IzotermChart.Series[IzotermChart.SeriesCount-1].AddXY(); // добавление точки в последнюю серию (последний график)



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

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

Наверх




Память: 0.47 MB
Время: 0.046 c
4-1205913889
lead-in
2008-03-19 11:04
2010.08.27
свойства файлов


15-1273641886
Дмитрий С
2010-05-12 09:24
2010.08.27
Что большее зло: goto или while true do ?


3-1238361532
TheEd
2009-03-30 01:18
2010.08.27
как "вытянуть" описаниея полей в DisplayLabel


2-1265613649
pavel_guzhanov
2010-02-08 10:20
2010.08.27
цвет под курсором мыши


8-1205234787
dmitry_12_08_74
2008-03-11 14:26
2010.08.27
Корректное снятие видео при копировании образа экрана