我已会设置DBGirdEh自动排序(Ehlib自带的),就是按下标题头,升序再按降序。
我现在想在窗体上放一个按钮,按下它也可以实现自动排序,可是不知道调用DBGridEh的哪个函数。请高手帮忙。

解决方案 »

  1.   

    好像没有这样的函数吧
    你可以通过其数据集的sort属性实现的procedure TForm1.Button10Click(Sender: TObject);
    var
      s:string;
    begin
      s:='qf_time';//需要排序的字段名
      if (Pos(s,self.ADOQuery2.Sort)>0) and (Pos('DESC',self.ADOQuery2.Sort)=0) then
        self.ADOQuery2.Sort:=s+' DESC'
      else
        self.ADOQuery2.Sort:=s;
      self.ADOQuery2.First;
      self.Memo1.Lines.Text:=self.ADOQuery2.Sort;
    end;
      

  2.   


    看看EhlibADO.pas, 具体在里面实现。
      

  3.   

    数据集(dbgrideh.datasource.dataset)的sort属性可以帮助你
      

  4.   

    找了很久,问题还是没有解决。Ehlib内部已经实现了按下网格标题按钮排序,我想不用再写一个排序了,直接调用EHlib实现排序的方法就可以了。
    请帮忙。