“聪明的程序员用Delphi”,因为Delphi易学易用,很快能够开发出高质量的软件来,备受程序员们青睐。 “最聪明的程序员用Delphi+Cell组件”,因为Cell组件是一款优秀的国产报表控件,在Delphi下使用,制作报表更加得心应手、如虎添翼。 让我们来看看如何在Delphi中使用Cell组件做简单的报表(即让程序打开一个Cell文件,然后选择表格区的一些数据来做一个功能简单的图表)为例,来体验一下在Delphi下使用Cell组件的全过程。 1、引入Cell组件控件 当你的计算机安装了Cell组件(在www.cellsoft.cc下载5.0版本)后,在Delphi的主菜单[Component ]→[Import ActiveX Control]下打开如下对话框。 在列表框中选择“Cell5.0 ActiveX Control module”,单击[Install...]按钮。根据向导一步一步操作,Cell组件就引用到Delphi下了。 在Delphi 6下新建一个工程,在面板上打开ActiveX面板组,其中突起的表格控件就是Cell组件了。 2、 构建对象 首先,在窗体上放一个Cell组件,调好大小。依次在Cell组件的右边放4个Button按钮,Caption属性分别设为“打开文件”、“创建图表”、“删除图表”和“关闭程序”。 最后在窗体上放一个OpenDialog控件,设置属性Filter的值,用来打开CLL文件(Cell组件生成的文件格式为CLL)。 3、代码实现 Button1的OnClick代码: begin{打开华表文件} if opendialog1.Execute then cell1.OpenFile(opendialog1.FileName,'') ; end; Button2的OnClick代码: var col1,row1,col2,row2:integer; begin{选择数据,创建图表} cell1.GetSelectRange(col1,row1,col2,row2); cell1.CreateChart(col1,row1,col2,row2,0); end; Button3的OnClick代码: Cell1.DeleteChart(Cell1.GetTopChartIndex(0), 0); {删除当前图表} 4、运行程序 到此为止整个程序就编好了。现在我们来运行程序: 单击[打开文件]按钮,先打开一个CLL文件, 再选中表格区域 ,单击[创建图表]按钮。这样,一个清晰的图表就制作出来了。 只写了几行代码就能做出这样的功能强大的图表来,简单吧。怎么样?赶快亲自动手试一试吧。 |