回 帖 发 新 帖 刷新版面

主题:急救!

怎么样对delphi中的DBGrid1进行排序?
功能可以一次单击升序二次单击降序......

回复列表 (共3个回复)

沙发

对它所连接的数据集进行排序它就会自动排序.

板凳

只需要排序它的数据集就可以了
比如select * from table order by ... ;

3 楼

这个方法也行,
点一下升序,在点一下降序
procedure TForm1.DBGrid2TitleClick(Column: TColumn);
begin
    if adsdj.Sort =column.FieldName  then  //adsdj 是数据集。adodateset
       adsdj.Sort:=column.FieldName +' DESC'
    else
       adsdj.Sort:=column.FieldName
end;

我来回复

您尚未登录,请登录后再回复。点此登录或注册