Switch programatically between HorizontalBar, and Bar

[Doogie]

Hi,

Is it at all possible, to toggle the chart between Horizontal Bar, and Bar, with the same data, but differently orientated, according to user preference.

If possible, how do I achieve this in code?


I want to rotate this from HorizontalBar to Bar.

[Yeray]

Hi Doogie,

Yes, you could use ChangeSeriesType function. For example:

Code: Select all

procedure TForm1.Button1Click(Sender: TObject);
var i: Integer;
    tmp: TChartSeries;
begin
  for i:=0 to Chart1.SeriesCount-1 do
  begin
    tmp:=Chart1[i];
    if Chart1[i] is THorizBarSeries then ChangeSeriesType(tmp,TBarSeries)
    else ChangeSeriesType(tmp,THorizBarSeries);
  end;
end;