例如我查询并显示出  男性为10个人也显示出来 我要再点击dbgrid 的title然后按升序降序
排列~我按下面语句用的话  再点击title等于是重新查询了全部的信息然后排列 如何做到在
已经查询的结果中  升序降序排列呢?
bDesc:boolean;
procedure TForm1.DBGrid1TitleClick(Column: TColumn);
var xiang:string;
 begin
  xiang:=column.FieldName;
  query1.Close;
  query1.SQL.Clear;
  query1.SQL.Add('select * from Tb');
  if bDesc then
     query1.SQL.Add(' order by '+xiang)
  else
     query1.SQL.Add(' order by '+xiang+' desc');
     query1.Active:=true;
     bDesc:=not bDesc;
 end;