资源描述:
《DxDbGrid与DbGridEh表格使用及导出Excel》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库。
1、DxDbGrid与DbGridEh表格使用及导出Excel分类:Delphi2011-05-1609:47110人阅读评论(0)收藏举报前言:二者都是非常不错的第三方表格控件,都可实现多表头的表格及分组汇总功能;在导出Excel方面,个人觉得DxDbGrid做的比DbGridEh出色,几乎是Grid原样导出,DbGridEh导出表格模式的单元格与Grid显示有所出入。一、所用版本及安装:1、版本:DevExQuantumGridv3.22ProforD7、EhLib5.2.842、安装:DevExQua
2、ntumGrid直接Setup.exe就OK;EhLib在Delphi7的安装稍微啰嗦点,具体步骤参考readme.txt或如下步骤:(1). 将EhLib5.2.84解压缩到目标目录。(2). 打开Delphi 7,将EhLib的/Delphi7子目录加到Delphi的Library path。(菜单操作路径为:Tools
3、Environment Options...
4、Library
5、Library path)(3). 将EhLib目标安装目录中的common和DataService子目
6、录的文件移动到EhLib的/Delphi7子目录中。(4). 在Delphi 7中打开EhLib70.dpk,编译,但不要安装。(5). 在Delphi 7中打开DclEhLib70.dpk,编译并安装。(6). 组件面板中出现一个EhLib的组件页。(7). 打开附带的DEMOS,编译并运行,测试安装成功。 二、使用DxDbGrid1、窗体拖入dxDBGrid1、ADOConnection1、ADOQuery1、DataSource1、Button1、 SaveDialog1,然后完成
7、数据的链接及相关控件关联,如何操作,你应该懂的;接下来完成如下图所示的一个表格:2、双击dxDBGrid1,在Bands栏增加TdxTreeListBand并填写Caption,注意要将dxDBGrid1的ShowBands属性设置为True才能显示Bands栏;同样双击dxDBGrid1,在Columns栏,添加多个dxGridColumn(根据需要选择不同的类型)并使其与数据库字段形成关联,涉及如下几个属性,BandIndex选择对应的Band从而形成二级表头,Caption、FieldName、H
8、eaderAlignment、width等,如此完成了基本的表格设计,如果喜欢表头平滑更改LookAndFeel属性为lfFlat即可。 如果增加排序功能,edgoAutoSort(True)、edgoLoadAllRecords(True)、KeyField(数据库表主键字段)。 如果需要Footer汇总,首先设置属性showSummeryFooter为True,然后选择需要汇总的dxGridColum根据需要更改其summaryFooterType属性如cstSum(或cstAv
9、g),如需要显示汉字,可设置SummaryFooterFormat如(平均年龄=0.00)。 导出Excel可直接利用dxDbGrid的SaveToXLS方法,具体代码参考如下:viewplaincopytoclipboardprint?1.unit Unit1; 2.interface 3.uses 4. Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 5. Dialogs, C
10、omCtrls, StdCtrls, dxExEdtr, dxCntner, dxTL, dxDBCtrl, dxDBGrid, 6. DB, ADODB, dxDBTLCl, dxGrClms; 7.type 8. TSaveMethod = procedure (const FileName: String; ASaveAll: Boolean) of object; 9.type 10. TForm1 = class(TForm) 11. GroupBox1: TGro
11、upBox; 12. GroupBox2: TGroupBox; 13. dxDBGrid1: TdxDBGrid; 14. ADOConnection1: TADOConnection; 15. ADOQuery1: TADOQuery; 16. DataSource1: TDataSource; 17. dxDBGrid1Column2: TdxDBGridColumn; 18.