Как убирать ненужные линии в tchart [D6, Win95/98]
Эдуард © (2002-04-30 16:50:00)
Скажите, как программно убирать ненужные линии в Chart?
Я пытаюсь делать следущее:
a:=chart1.SeriesCount;
for i:=0 to a-1 do
begin
try chart1.SeriesList.Delete(i) except end; (не уверен тут)
end;
try val(edit1.Text,jm,ind) except jm:=0 end;
for j:=0 to jm do
begin
ser1:=tlineseries.Create(self);
ser1.ParentChart:=chart1;
ser1.Active:=true;
for i:=0 to 20 do
begin
ser1.AddXY(i,i*2*(j+1)); (это просто пример)
end;
end;
MBo (2002-04-30 18:34:00) [1]
for i:=chart1.SeriesCount-1 downto 0 do
chart1.Series[i].free;
кстати, для val не надо try - ind даст код ошибки,
можно и StrToInt использовать
Наверх 
ЧАТ |
Орешник |
|
