работа с TChart [D5, D6, Win95/98, Win2k, WinXP]
Lance © (2002-06-03 15:20:00)
Такая проблема:
Необходимо динамически создавать, удалять, менять количество
серий в чарте.
приведите плз пример кода.
Dennn_is (2002-06-03 16:55:00) [1]
ну вот так у меня:
var MyD:TLineSeries;
MyD := TLineSeries.Create(Self);
MyD.ParentChart := DBChart1;
MyD.SeriesColor := frmRGraf.Colordialog1.Color;
MyD.Title := "График"
MyD.DataSource := DatMod.tbIzm;
{База данных}
MyD.XValues.ValueSource := "NumPara";
{поле из БД}
MyD.YValues.ValueSource := "RazIz";{поле из БД}
MyD.XLabelsSource := "Number";
MyD.Marks.Style := smsLabelValue;
MyD.Marks.Visible := true;
MyD.LinePen.Width := 2;
MyD.Active := true;
Удаление всех сессий:
DBChart1.FreeAllSeries;
Наверх 
ЧАТ |
Орешник |
|
