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

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

Tchar и его графики [D7]


FIL-23 ©   (2010-02-14 17:44:00) 

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 имен в переменых определять? .. народ кто знает как можно зациклить данную процедуру.... чтобы имя само создавалось???


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

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


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

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


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


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


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


Наверх

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