Forum: Object-Pascal / Delphi-Language
Delphi
by Andreas Schilling,
22. Apr 2009
Hab es mal ausprobiert mit TDBChart. Der Quelltext kann 1 : 1 verwendet werden. Damit Circled bekannt ist, muss Series1 in der Entwicklungsumgebung auf TPieSeries eingestellt sein.
Forum: Object-Pascal / Delphi-Language
Delphi
by Andreas Schilling,
22. Apr 2009
Also beim normalen Chart geht es so. Eventuell funktioniert es wenn die Variable auf TDBChartseries geändert wird.
// Umstellung über Radiogroup
procedure TLeistungen_F.RG_AuswahlClick(Sender: TObject);
var Serie01 : TChartSeries;
begin
Serie01 := (series1 as Tchartseries);
if RG_Auswahl.ItemIndex = 0
then ChangeSeriesType(serie01, TChartSeriesClass(THorizBarSeries))
else begin