[Petros9n]

У меня есть динамически создаваемый TChart и к нему BarSeries, так вот когда если на форме TChart и открыть в свойствах SeriesList и там выбрать
Format -> Size -> % Bar Width то можно таким образом контролировать ширину, а как это изменять программно или хотя-бы не процентное значение, а просто ширину - Width
Я обращаюсь к элементам так
cht1.SeriesList[i].
и Width найти там не могу, нашел только Pen.Width если его менять то это отражается только на ширине контора.

Помогите пожалуйста уже перерыл кучу форумов найти ответ не могу

[Страдалецъ]

Если я правильно понял, то вам нужно это:

Код:

Series1.BarWidthPercent

[Страдалецъ]

А вообще, свойство SeriesList содержит элементы базового типа TChartSeries. На основе этого типа построены все виды диаграм. В вашем случае это TBarSeries. Поэтому для доступа к методам и свойствам TBarSeries вам необходимо сделать приведение типов. Выглядеть это может так:

Код:

 for i := 0 to Chart1.SeriesList.Count - 1
 do if Chart1.SeriesList.Items[i].ClassType = TBarSeries
    then TBarSeries(Chart1.SeriesList.Items[i]).BarWidthPercent := 25;

В этом примере для всех диаграм-столбиков будет выставлена ширна в 25%. А вот свойство BarWidth используется только для чтения и задать в нем собственное значение не выйдет.

[Petros9n]

То что надо, большое спасибо!