如何用delphi的图形BDChart画出饼状图,要求图显示街道的老年人,中年人,青年人和儿童的比例。表描述如下:
街道名称 老年人比例 中年人比例 青年人比例 儿童比例
街道一 15 30 30 25
街道二 16 29 29 26
. . . . .
. . . . .
. . . . .
街道n 17 28 30 25
街道名称 老年人比例 中年人比例 青年人比例 儿童比例
街道一 15 30 30 25
街道二 16 29 29 26
. . . . .
. . . . .
. . . . .
街道n 17 28 30 25
//DecisionGraph: TDecisionGraph是Delphi7控件面板Decision Cube下的组件procedure TForm1.BitBtn1Click(Sender: TObject);
var
cs: TPieSeries;
begin
DecisionGraph.SeriesList.Clear;
cs := TPieSeries.Create(nil);//创建一个馅饼状的统计图
DecisionGraph.AddSeries(cs);
cs.AddPie(30, '老年人', clBlue);
cs.AddPie(21, '年轻男人', clRed);
cs.AddPie(19, '年轻女人', clYellow);
cs.AddPie(30, '小孩子', clGreen);
end;