DELPHI编程控制Excel自动生成报表.pdf

DELPHI编程控制Excel自动生成报表摘要Excel是当前最时髦的数据报表制作道

具。本文介绍问号应用DELPHI编程来控制Excel完成数据库Databnse与报表之间的

数据交换研讨了报表制作工程中的一部份细节性疑难问题。关键字DELPHI编程

Excel报表引言数据报表作为企事业公司上报和下达的重要消息载体随着消息化

建设的不断推进在实际的务工中得到了前所未有的实际运用。因此数据报表已经成

了管制消息操作系统中重要的一项功能并且由于数据的多样性和来访量情况消息的

渐增数据报表的操作系统呈现变得愈来愈复杂。DELPHI编程是唯一高效的可视化

数据库Databnse管制消息操作系统开发道具.但是DELPHI编程开发环境中帮助的报

表控件在制作复杂报表时显得不够理想不管是以前版本帮助的QuickReport控件组

还那样DELPHI编程7帮助的Rave控件组都别让用户对生成的报表停止改动且程式

控制很难呈现。Excel作为现代办公日常的电子表格制作道具以它的易操作性和实战

性得到了各业界办公大家的青睐。本文根据实际实际运用实践介绍利用DELPHI编

程编程控制Excel生成报表的各种窍门。DELPHI编程控制Excel的窍门1创建Excel

文档要在DELPHI编程中控制Excel就必需用到OLE自动化。目前一般采用OLE2来

创建OLE对象当激活唯一OLE对象时效劳器程式仅在容器程式内部激活这就所谓的

就地激活“”in-placeactivation。创建Excel文档时先创建唯一OLE对象然后在对象中

建立务工表worksheet如参数createExcel所示functioncreateExcel:variantvarv:variant

sheet:variantbeginv:createoleobjectExcel.Application//创建OLE对象v.visible:true

v.workbooks.add-4167//添加务工表v.workbooks1.sheets1.name:test

sheet:v.workbooks1.sheetstestreturnvend2数据表格控制Excel表格的控制主要包

括数据的导入、改正单元格的合并、边框的控制表格的复制、粘贴等。当报表各式

一定的情况下表格的复制、粘贴显得尤为重要那样能够先制作唯一文档模板然后按

照实际需求输出多页报表即可。1数据的导入importDataprocedureimportDatavar

Ij:integerv:variantbeginv:createExcel//创建Excel文档testforI:0tomaxcolumndo

beginforj:0tomaxrowdov.workbooks1.sheets1.cellsIj:Ij//导入数据endend2单元格

的合并、边框的控制lineStylecontrol单元格的合并是在选定合并范围的情况下停止

的。边框控制能够操作边框线条的也许呈现。更多有联系方法的控制能够仿照下面

过程停止。procedurelineStylecontrolvarvsheetrange:variantbeginv:createExeclsheet:

v.workbooks1.sheets1range:sheet.rangesheet.cells11sheet.cells3930//选定表格

range.selectrange.merge//合并单元格range.borders.linestyle:xlcontinuous//置边框线

可见range.font.size:9//改变表格内文档字体大小endzmbbs13表格的复制与粘贴

copyandPasteprocedurecopyandPastevarvsheetrange:variantbeginv:createExeclsheet:

v.workbooks1.sheets1range:sheet.rangesheet.cells11sheet.cells3930range.select//选定

要复制的表格range.copy//复制选定的表格

sheet.rangesheet.cells401sheet.cells401.select//选取要粘贴的位置sheet.paste//粘贴表

格end3文档的保存文档保存是在创建文档的基本上停止的过程saveFi