同上,

解决方案 »

  1.   

    首先
    Pivate
      FieldSort :String;
      FlagSort :Boolean;在窗体FormSHow事件中
      初始化:
     FieldSort :='';
     FlagSort :=False;
    然后再DBGrid1TitleClick(Column: TColumn);
    begin
      FlagSort :=Not FlagSort;
      FieldSort :=Column.FieldName;
      with AdoQuery1 do
      begin
        Close;
        Sql.Add('select * from Table ');
        if FieldSort<>'' then
        if FlagSort then
           Sql.Add('ord by '+FIeldSort+' asc ')//升序
        else
           Sql.Add('ord by '+FIeldSort+' desc ');//降序
        Open;
          
      end;
    end;
      

  2.   

    到http://expert.csdn.net/Expert/topic/1888/1888839.xml?temp=.9655115看看!
      

  3.   

    1,用sql语句啊
    2,单击dbgrid的标题按标题排序:adoquery1.sort:=colmnu.fieldname;