dbgrideh 如何实现点击标题后按标题字段排序 ( 积分: 10 )

dbgrideh 如何实现点击标题后按标题字段排序

呵呵``最近手头恰好有一份 《DBGRIDEH 组件在Borland开发工具中应用全攻略 》要的朋友留下mail.

从网上一载一个，有的DBGRIDEH是直接单击标题就可以排序的，

给我一份,Ming_cn@163.com,谢谢先

发了``去邮箱看看！！

我也要
yuanshiren@gmail.com
谢谢

xiaxianshuang@163.com

谢谢好心人
liuguilg@126.com

这个blog
http://hi.baidu.com/cncharles/blog/item/b22c7f63fc304c610c33fa5e.html

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
ADOQuery1.Sort := sortstring //dataset为实际数据集变量名
except
end;
end;
end;

不用这么麻烦，你的DBGRIDeh版本不对，找个好的版本，可以自动排，除了LOCKUP的字段不能排以外

来自：李翔鹏, 时间：2007-6-12 15:00:01, ID：3797300
从网上一载一个，有的DBGRIDEH是直接单击标题就可以排序的，

同意上面的

同意上面的，dbgrideh中的属性有这个，不用写代码。。。。。。。你下的什么版本啊去delpih盒子找最新的版本