Delphi下EasyGrid使用体会

   最近在编写软件的时候,非常需要一款支持多表头的StringGrid控件,朋友介绍使用EasyGrid控件,这款控件大概从04年开始就没有再更新,网上有关与它的资料也较少。但是通过其demo,此软件还是能满足需要,由于资料少,所以将自己在使用过程中的一些体会整理出来。

 一、多表头合并

   在EasyGrid中提供了SetMerges方法用于多表头合并,该方法原型:procedure TCustomEasyGrid.SetMerges(AMergeRect: TRect; WantPrompt: Boolean = False);

   最初我一直没有明白TRect这个类型该如何表示,后来经过多次实验,才知道TRect中Top、Left、Bottom、Right,分别是对应表格中开始Cell与结束Cell。考虑到这种方法不大适合理解,于是编写一个函数来直观表示多单元格合并,代码很简单。

//AStartCol 开始列  AStartRow 开始行  AEndCol 结束列  AEndRow 结束行

procedure TForm1.MerrgeCells(AStartCol, AStartRow, AEndCol,
  AEndRow: integer; AEasyGrid: TEasyGrid);
var
  x : TRect;
begin
  x.Top := AStartCol;
  x.Left := AStartRow;
  x.Bottom := AEndRow;
  x.Right := AEndCol;
  AEasyGrid.SetMerges(x);
end;

    调用示例:MerrgeCells(3,3,4,3,MyEasyGrid) 表示合并Cells[3,3]与Cells[3,4]这两个单元格。

二、数据显示

  EasyGrid是从StringGrid继承而来,很多操作方法因此与StringGrid相似,如像某个单元格赋值Cells[2,2] := ‘Hello’,但在EasyGrid中这样操作后,值却出不来,必须要鼠标点击一下才可。解决方法:在给单元格赋值之后,调用AutoUpdate := True,即可立即显示出内容。

转载于:https://www.cnblogs.com/gis_gps/archive/2009/04/28/1445036.html

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值