文件名称:Delphi7 向Excel文件中插入多种图表.rar
文件大小:8KB
文件格式:RAR
更新时间:2022-07-30 05:26:41
Delphi源码-界面编程
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
【文件预览】:
codesc.net
----Excel.Workbooks()
--------Book2.xls(14KB)
--------Unit1.ddp(51B)
--------Project1.res(876B)
--------Unit1.dcu(5KB)
--------Unit1.dfm(1KB)
--------Project1.cfg(434B)
--------Project1.dpr(188B)
--------Project1.dof(2KB)
--------Unit1.pas(1KB)