dbgrideh 组件 ( 积分: 20 )

1.在窗体上放置一个 dbgrideh 组件，并将其连接到相应的 bde 数据集；
2.将该组件的[optionsen]中的 dgautosortmarking 属性设置为 true;
3.双击该组件，在其弹出的属性编辑器中添加相关字段；
4.将要排序的字段的属性列表的 [title]的 titlebutton 属性设置为 true;
5.在 uses 子句中加上 ehlibbde单元。

出现的错误是找不到ehlibbde.duc文件

可以测一下：在form上只放一个dbgrideh,看能不能运行！否则为组件安装错误！

自动显示标题行的升降排序标志符（▽降序△升序）并做相应排序
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型字段不可做上述设置，否则系统会提示错误。

这种方法我已经测试过，可行。你可以试试。

应该是安装组件时文件缺失

安装文件不够.
要先编译一下.

安装文件不全，到盒子上重新下一个吧 http://www.2ccc.com

缺少ehlibbde.duc

组件安装的不正确，安装文件不够，重新安装一下吧

安装包重新创建一个，再安装即可。

你是不是多放了一个ehlibbde.duc