我想做一个统计学生成绩的饼图

把学生的成绩统计出来：stu_Score[0]＝10，表示10个人的成绩在100分－90分，stu_Score[1]＝6，表示6个人的成绩在89－80分，…………stu_Score[4]表示有4个人不及格，如何用饼图表示出来？通过一个按钮实现：
procedure TForm3.Button2Click(Sender: TObject);
begin
  …………怎么写呢？
end;