请问如何动态改变chart的图形样式，如从线形图改变为直方图

Question

在设计中能够对图形的样式进行改变，请问在程序运行时怎么动态改变样式
请高手帮帮忙！

Answer 1

增加多个Series，然后在运行时选择相应的Series即可。
procedure TFMainChart.PopMenuClick(Sender: TObject);
var
  gItem: TMenuItem;
  i: Integer;
begin
  for i:=0 to myChart.SeriesCount - 1 do
    myChart.Series[i].Active:=False;  if (Sender is TMenuItem) then
  begin
    gItem:=(Sender as TMenuItem);
    myChart.Series[gItem.Tag].Active:=True;
  end;
end;

Answer 2

程序中已经有12个Series
增加Series的话，显得特别的多设计时改变Series的形状那么容易，为什么程序中动态改变这么困难呢！