Delphi-PRAXiS - Delphi Darstellung von TDBChart zur Laufzeit ändern

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi Darstellung von TDBChart zur Laufzeit ändern (https://www.delphipraxis.net/27402-darstellung-von-tdbchart-zur-laufzeit-aendern.html)

Darstellung von TDBChart zur Laufzeit ändern

Servus,

mich würde interessieren, ob es möglich ist zur Laufzeit zum Beispiel von einem Liniendiagramm auf ein Säulendiagramm umzustellen. In der OH habe ich leider nichts dazu gefunden. Das einzigste was funktioniert ist das wechseln von 2D auf 3D und umgekehrt.

Danke für Eure Mithilfe

mfg

Jonny

Re: Darstellung von TDBChart zur Laufzeit ändern

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