ich habe jetzt in der
OH ein beispiel gefunden:
Zitat:
Series Example
The following example will set all Bar Series Style to Cilinders
for t := 0 to Chart1.SeriesCount - 1 do
if Chart1.Series[ t ] is TBarSeries then
( Chart1.Series[ t ] as TBarSeries ).BarStyle := bsCilinder ;
das funktioniert aber nicht, da chart1.series keine TBarSeries ist.
dann habe ich es wie folgt versucht:
Zitat:
TCustomBarSeries(DBChart1.SeriesList.Series[0]).BarStyle := bsEllipse ;
DBChart1.SeriesList.Series[0].Repaint;
DBChart1.SeriesList.Series[0].RefreshSeries;
da tut sich aber auch nichts
keiner ne idee?
mfg Jonny