Delphi＋Cell轻松做报表

热门软件: QQ 瑞星 pplive e话通木马克星千千静听 office2000 五笔字根 Photoshop 视频分割

返回文章教程首页 >> 文章首页 >> 编程技术 >> Delphi教程 >> Delphi＋Cell轻松做报表

Delphi＋Cell轻松做报表

添加时间: 2006-2-26 8:25:47 作者: Delphi教程阅读次数:75 来源: http://www.d9soft.com

　　“聪明的程序员用Delphi”，因为Delphi易学易用，很快能够开发出高质量的软件来，备受程序员们青睐。

　　“最聪明的程序员用Delphi+Cell组件”，因为Cell组件是一款优秀的国产报表控件，在Delphi下使用，制作报表更加得心应手、如虎添翼。

　　让我们来看看如何在Delphi中使用Cell组件做简单的报表（即让程序打开一个Cell文件，然后选择表格区的一些数据来做一个功能简单的图表）为例，来体验一下在Delphi下使用Cell组件的全过程。

引入Cell组件控件

　　当你的计算机安装了Cell组件（在www.cellsoft.com下载5.0版本）后，在Delphi的主菜单［Component ］→［Import ActiveX Control］下打开如下对话框（如图1）。

　　在列表框中选择“Cell5.0 ActiveX Control module”，单击［Install...］按钮。根据向导一步一步操作，Cell组件就引用到Delphi下了。

　　在Delphi 6下新建一个工程，在面板上打开ActiveX面板组（如图2），其中突起的表格控件就是Cell组件了。

构建对象

　　首先，在窗体上放一个Cell组件，调好大小。依次在Cell组件的右边放4个Button按钮，Caption属性分别设为“打开文件”、“创建图表”、“删除图表”和“关闭程序”（如图3）。

　　最后在窗体上放一个OpenDialog控件，设置属性Filter的值（如图4），用来打开CLL文件（Cell组件生成的文件格式为CLL）。

代码实现

　　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);　　｛删除当前图表｝

运行程序

　　到此为止整个程序就编好了。现在我们来运行程序：

　　单击［打开文件］按钮，先打开一个CLL文件，再选中表格区域，单击［创建图表］按钮。这样，一个清晰的图表就制作出来了（如图5）。

　　只写了几行代码就能做出这样的功能强大的图表来，简单吧。怎么样？赶快亲自动手试一试吧。

上下文章:

上一篇文章: 制作一个IPhunter 下一篇文章: 播放自定义的声音

相关文章:

相关软件:

字母检索 A B C D E F G H I J K L M N O P Q R S T U V W X Y Z 回到顶部

Delphi＋Cell轻松做报表

快速导航

编程技术分类导航

本类经典文章推荐

Delphi教程阅读排行

编程技术阅读总排行

广告位置