急急急,如何在Delphi中将数据生成Excel图? 请给出参数和方法,谢谢各位了! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 请参考,DELPHI中控制OFFICE的方法 使用Delphi 控制Excle二维图在Form中分别放入ExcelApplication, ExcelWorkbook和ExcelWorksheetvar asheet1,achart, range:variant;1)选择当第一个工作薄第一个工作表asheet1:=ExcelApplication1.Workbooks[1].Worksheets[1];2)增加一个二维图achart:=asheet1.chartobjects.add(100,100,200,200);3)选择二维图的形态achart.chart.charttype:=4;4)给二维图赋值series:=achart.chart.seriescollection;range:=sheet1!r2c3:r3c9;series.add(range,true); 5)加上二维图的标题achart.Chart.HasTitle:=True;achart.Chart.ChartTitle.Characters.Text:=’ Excle二维图’ 6)改变二维图的标题字体大小achart.Chart.ChartTitle. 而且你试过4)给二维图赋值series:=achart.chart.seriescollection;range:=sheet1!r2c3:r3c9;series.add(range,true);吗?是有问题的 我用canvas跟别人的圆不一样,有毛刺 请教DelphiX TDirectDrawSurface 如何按宽高缩放? 用listview可以实现类似文件操作吗 重分--急问:如何在英文win操作系统环境下Memo里显示中文? 怎样得到一个文件夹的大小?马上揭帖! 寻求 ip控件,功能可以自动检查输入的是否是合法的IP?? 如何在报表里显示并打印当前表里的记录(急) 請問關於行為方面的一個問題? 信誉分为0会怎样? 介绍一几个DELPHI网站吧,大哥们 如何用程序设置或修改现有系统的IP地址等信息 BDE问题
在Form中分别放入ExcelApplication, ExcelWorkbook和ExcelWorksheet
var asheet1,achart, range:variant;1)选择当第一个工作薄第一个工作表
asheet1:=ExcelApplication1.Workbooks[1].Worksheets[1];2)增加一个二维图
achart:=asheet1.chartobjects.add(100,100,200,200);3)选择二维图的形态
achart.chart.charttype:=4;4)给二维图赋值
series:=achart.chart.seriescollection;
range:=sheet1!r2c3:r3c9;
series.add(range,true);
5)加上二维图的标题
achart.Chart.HasTitle:=True;
achart.Chart.ChartTitle.Characters.Text:=’ Excle二维图’ 6)改变二维图的标题字体大小
achart.Chart.ChartTitle.
series:=achart.chart.seriescollection;
range:=sheet1!r2c3:r3c9;
series.add(range,true);
吗?是有问题的