DBGridEH使用技巧1.docVIP

DBGridEH使用方法1 应用实例? ? Enlib3.0组件包安装成功后，在系统的组件面板中会显示“enlib”组件包标签（如图1），添加DBGridEh到窗体的方法与其它组件一样。在窗体中添加该组件后，请跟我一起来实现图2的一些特殊效果，具体属性设置请参考属性表的说明。A、定制标题行?1、制作复杂标题行? ? 标题行可设为2行以上高度，并可以为多列创建一个共同的父标题行。为实现这个效果，需在各个列标题属性中以“｜”分隔父标题和子标题，如办公用品包括代码和名称两部分，具体属性设置如下：usemultititile=true;titlelines=2DBGridEh.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、定制表格底部（footer）区域的汇总统计行? ? DBGridEh 组件可以在表格底部显示汇总行，如记录数合计、列字段累加和等信息。在FooterRowCount中设置底部显示的行数；然后在Footers 编辑器中添加一个或多个显示列，显示列可以是字段值累加和、记录数合计、字段值或静态文件等集合类型，可以在设计时在ValueType属性中设置，也可在运行时通过设置Footers[i].ValueType指定其类型。其含义见下表：? ? 切记设置DBGridEh.SumList.Active 为 True，才会进行汇总统计运算。需注意的是，如显示类型为不是当前列的累加和，则需在fieldname属性中指定汇总列，其它类型则无此要求。 ? C、定制表格数据单元外观?1、根据不同字段值显示相应的小图片? ? 如根据库存材料的不同状态在数据单元格中显示相应图片，具体设置如下：? ? 添加一个imagelist组件img1并在其中添加一组bmp,ico格式的图片。然后将需要显示图片的列的imagelist属性设置为img1；在keylist属性中添加实际数据存储值，一行为一个值，切记一定要与imagelist中图片顺序一一对应