如何实现在dbgrid中点击title实现按照这个子段的排序!!!!

解决方案 »

  1.   

    用外部控件DEV EXpress的cxgrid可以轻松实现!
      

  2.   

    在ontitleclick事件进行编程就可以;
      

  3.   

    用关闭数据集-》select * from table1 order by ... -》 重打数据集
      

  4.   

    全局变量:
    var
    sorttype:string;
    ......
    sorttype:='ASC';
    ...... 
    procedure TForm1.DBGrid1TitleClick(Column: TColumn);
    begin
      query1.sql.text:= 'select * from XXX order by+"'sorttype'"';
      query1.open;
      if sorttype='ASC' then sorttype:='DSC' else sorttype='ASC';
    end;