• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号
登陆 注册

DBGridEH在Delphi7中的安装方法及使用说明

原作者: [db:作者] 来自: [db:来源] 收藏 邀请
Delphi7自带的DBGrid控件在数据控制方面略显弱势，因此网上流行的DBGridEH控件显得尤为重要，下载了安装方法
还比较繁琐，因此写个说明，呵呵，方便自己及同道中人查阅。顺便提供个DBGridEH下载地址：
http://www.51delphi.com/delphi/download?num=1，注意要在IE里面输入这个地址,我用火狐浏览器就下载不了，
我也不知道为什么。
///////////////////////////////////////////////////////////////////////////////////////////////////////
(1)新建文件夹:D:\Program Files\Borland\Delphi7\下新建目录Ehlib
(2)在Tools->Environment Options->Library->Library Path 中添加这个目录.
(3)将Common和Delphi7中的目录的文件拷贝到上面的这个目录中
(4)打开runtime package - EhLib70.Dpk文件,点击"Compile"编译这个package
(5)打开并编译EhLibDataDrivers70.Dpk
(6)在编译完run-time packages 后安装DclEhLib70.BPL和DclEhLibDataDrivers70.BPL
(design-time packages)into the IDE.BPL文件在你自己定义的:$(DELPHI)\Projects\Bpl
(7)打开DclEhLib70.Dpk(design-time package)编译,然后点击"Install"to register EhLib
components on the component palette.]
(8)最后打开和安装DclEhLibDataDrivers70.Dpk package
//////////////////////////////////////////////////////////////////////////////////////////////////////
DBGridEH使用说明如下：
   a、定制标题行   
  1、制作复杂标题行  
  标题行可设为2行以上高度，并可以为多列创建一个共同的父标题行。为实现这个效果，需在各个列标题属性中以“｜”分隔父标题和子标题，如办公用品包括代码和名称两部分，具体属性设置如下：    
  usemultititile=true;  
  titlelines=2    
  dbgrideh.columns[0].title.caption   :=   办公用品|代码;   
  dbgrideh.columns[1].title.caption   :=   办公用品|名称;   
  2、标题行显示图片     
实现图2中的购买人标题行显示效果。首先添加一个imagelist组件img1并在其中添加一组bmp,ico格式的图片。然后将dbgrideh的
titleimages设置为img1.最后在需要显示图片的列标题的imageindex中设置需要显示的img1中图片的序号。按f9执行一下程序，
是不是很酷！  
  3、自动显示标题行的升降排序标志符并做相应排序     
  dbgrideh组件可以在标题行单元格中显示小三角形升、降排序标志符图片，在运行时可点击标题行，图片自动切换并做相应排序。具体属性设置如下：    
  optionseh＝dghautosortmarking     
  column.title.titlebutton＝true     
  sortmarkedcolumns   为当前排序列可在运行时使用.    
  然后在该列的ontitleclick事件中添加代码：   
  procedure   tform_query.dbgrideh1titlebtnclick(sender:   tobject;  
  acol:   integer;   column:   tcolumneh);   
  var     
  sortstring:string;   //排序列   
  begin   
  //进行排序  
  with   column   do    
  begin  
  if   fieldname   =      then  
  exit;   
  case   title.sortmarker   of   
  smnoneeh:    
  begin     
  title.sortmarker   :=   smdowneh;    
  sortstring   :=   column.fieldname   +      asc;      
  end;    
  smdowneh:   sortstring   :=   column.fieldname   +      asc;   
  smupeh:   sortstring   :=   column.fieldname   +      desc;  
  end;    
  //进行排序  
  try   
  dataset.sort   :=   sortstring   //dataset为实际数据集变量名   
  except    
  end;       
  end;    
  end;   
  切记lookup型字段不可做上述设置，否则系统会提示错误。     
  另外，组件说明书中提到不需要编写代码即可自动排序，但是不编写代码自动排序方法我还没找到，有知道的朋友烦请告诉我一声啊！让我也对程序代码进行“减肥”。  
 
 b、定制表格底部区域的汇总统计行  
  dbgrideh  
组件可以在表格底部显示汇总行，如记录数合计、列字段累加和等信息。在footerrowcount中设置底部显示的行数；然后在footers  
编辑器中添加一个或多个显示列，显示列可以是字段值累加和、记录数合计、字段值或静态文件等集合类型，可以在设计时在valuetype属性中设置，也可
在运行时通过设置footers[i].valuetype指定其类型。其含义见下表：       
  属性值  
     fvtsum  
     fvtcount  
     fvtfieldvalue  
     fvtstatictext   
  含义  
     字段累加和  
     记录数合计  
     字段值  
     静态文本    
  切记设置dbgrideh.sumlist.active为true，才会进行汇总统计运算。需注意的是，如显示类型为不是当前列的累加和，则需在fieldname属性中指定汇总列，其它类型则无此要求。  

鲜花
握手
雷人
路过
鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
More+
上一篇：
matlab 全局变量的使用举例发布时间：2022-07-18
下一篇：
终于, Delphi XE2 携带 GDI+ 库了发布时间：2022-07-18
热门推荐
More+
热门话题
More+
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服（服务时间 9:00～18:00）

在线QQ客服
地址：深圳市南山区西丽大学城创智工业园
电邮：jeky_zhao#qq.com
移动电话：139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap