怎樣對TQuery進行排序

Question

怎樣對TQuery進行排序

Answer 1

'Select * from mytable order by myfield'

Answer 2

我的意思是TQuery已經得到數據,我怎樣可動態的讓調整數據的排序,不需要重新
去提數據

Answer 3

以下代码，仅供参考：
procedure Tmoduleform.DBGrid1TitleClick(Column: TColumn);
begin
  if clientdataset1.IsEmpty then
     exit;
  clientdataset1.DisableControls;
  if indexname='降序' then  //按升序排列
     begin
       if clientdataset1.IndexName='Indexname' then
          clientdataset1.DeleteIndex('Indexname');
       clientdataset1.AddIndex('Indexname',column.FieldName,[],column.FieldName,'',0);
       ClientDataSet1.IndexName:='Indexname';
       indexname:='升序';
     end
  else   //按降序排列
     begin
       if clientdataset1.IndexName='Indexname' then
          clientdataset1.DeleteIndex('Indexname');
       clientdataset1.AddIndex('Indexname',column.FieldName,[],'','',0);
       ClientDataSet1.IndexName:='Indexname';
       indexname:='降序';
     end;
  clientdataset1.EnableControls;
  isenabled;
  mainform.StatusBar1.Panels[0].Text:='共'+inttostr(clientdataset1.RecordCount)+'条记录，'+'当前第'+inttostr(clientdataset1.RecNo)+'条';
end;