Delphi 7.0 利用饼型图分析公司男女比率，Delphi结合Access生成图表，生成一个圆饼图表的功能。 　　procedure TForm1.FormCreate(Sender: TObject); 　　begin 　　 with ADOQuery1 do 　　 begin 　　 Close; 　　 SQL.Clear; 　　 SQL.Add('SELECT sex,COUNT(sex) AS qty FROM tbS_employ group by sex'); 　　 Open; 　　 end; 　　 DBChart1.Series[0].XLabe