Delphi7 向Excel文件中插入多种图表.rar

Delphi7 在Excel中插入图表，向excel中插入圆饼图表、柱状图表、圆锥图表、棱锥图表这四种图表，需要你的电脑上之前安装有Excellent2003、2007等版本，不过高版本没有测试是否可用，我觉得这个功能还是挺实用的： 　　begin 　　 Excel :=CreateOleObject('Excel.Application'); 　　 WorkBook := Excel.Workbooks.Open(FileName := ExtractfilePath(Application.ExeName) 'Book2.xls'); 　　 WorkSheet := Excel.Sheets.item['Sheet1']; 　　 Excel.Visible := true; 　　 ChartObject := WorkSheet.ChartObjects.Add(100, 100, 400, 300); 　　 ChartObject.Chart.ChartType :=temp; 　　 ChartObject.Chart.SetSourceData(WorkSheet.Range['A1:E5']); 　　end