Опять про Chart

← →
Катерина (2002-04-23 14:25) [0]

В RunTime устанавливаю кол-во точек на PAGE CODE>Chart.MaxPointsPerPage := theZoom;
Для линейного графика это работает, а для точечного (TPointSeries) - только одна точка рисуется. Почему?

← →
MBo (2002-04-23 14:38) [1]

у меня все работает. чему равно theZoom?

← →
Катерина (2002-04-23 14:52) [2]

Вот кусок кода theZoom - целое, положительное.

procedure TFrame_EditPar.Edit_zoomChange(Sender: TObject); var code, theZoom : integer; begin val(Edit_zoom.Text,theZoom,code); if (Code = 0) and (theZoom > 0) then Chart.MaxPointsPerPage := theZoom else Chart.MaxPointsPerPage := 1+k_pro-n_pro; end;

Причем в Chart - 2 серии : линейная и точечная, определенные в одних и тех же целых аргументах. Если Линейный график присутствует один или вместе с точечным, то все в порядке. Но если только точечный, то при любом изменении theZoom, рисуется только одна точка.

Спасибо за подсказку: как в RunTime менять размер точки в точечном графике. Очень пригодилось.

← →
MBo (2002-04-23 15:03) [3]

У меня и это работает. В настройках Chart ничего не наворочено?
Кстати, про StrToInt и StrToIntDef знаешь?
И, может, для задания UpDown или SpinEdit удобно будет?

← →
Катерина (2002-04-23 15:37) [4]

Знаю и использовала UpDown и пр. Но все равно не работает, хотя установки для линейного и точечного графика одинаковые почти. Создала еще один точечный график и рез-т тот же: если присутствует линейный - рисует все, если точечные без динейного - одну точку. Причем такая особенность: абсциссы всех графиков - целые числа, начинающиеся с 1 (1,2,3,...), а когда рисуется эта самая одна точка (если отсутствует линейный график), ее абсцисса - 0.

← →
MBo (2002-04-23 16:09) [5]

вероятно, это глюк. сделай pointserie первой в списке.(удали и снова добавь lineserie)

← →
Катерина (2002-04-24 09:32) [6]

Кажется я разобралась. Если первый график (SeriesList[0]) не задан (Clear), причем все равно какой: линейный или точечный, то при изменении Chart.MaxPointsPerPage, она реагирует неадекватно: показывает 1 точку с нулевой абсциссой, а если в SeriesList[0]) задан любой график, проблем нет.

← →
MBo (2002-04-24 09:44) [7]

Еще один глюк, который я видел-
две серии, ось для одного слева, для другого справа. если в одной из серий идут только постоянные Y-значения, программа вылетает.

Опять про Chart Найти похожие ветки