delphi - 垂直绘制多个饼图？

Question

使用默认设置，我得到这样的结果：


问：有什么方法可以垂直绘制多个饼图？

Answer 1

查看TeeChart安装随附的功能演示中的“所有功能\欢迎！\图表样式\ Standard \ Pie \ Multiple Pie”中的示例（或下载预编译的演示here）。

在其中，您将看到如何在系列的BeforeDrawValues事件中定义系列要使用的矩形。即：

procedure TPieMultiple.Series1BeforeDrawValues(Sender: TObject);
begin
  Chart1.ChartRect:=Rect(10,10,Chart1.Width div 2, Chart1.Height div 2);
end;