Главная страница
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.055 c
15-1268649323
Из батника
2010-03-15 13:35
2010.08.27
Удаление каталога


8-1204201324
ERT
2008-02-28 15:22
2010.08.27
PrintScreen


15-1265361958
Ghost
2010-02-05 12:25
2010.08.27
Nokia 3110c передача *.txt по синезубу


2-1273094862
concord
2010-05-06 01:27
2010.08.27
Настройка выпадающего списка


15-1266769968
TUser
2010-02-21 19:32
2010.08.27
Суворов о деле Пеньковского