Código Delphi [-] Var MySeries:TChartSeries; MySeries:=Series1; ChangeSeriesType( MySeries, TBarSeries );
Var MySeries:TChartSeries; MySeries:=Series1; ChangeSeriesType( MySeries, TBarSeries );