delphi中如何通過單擊列標題進行公升降排序，
在dbgrid的ontitleclick事件裡新增這樣的事件處理
3 if frmdatapool.qry需要做的事.sql.text.contains('desc') then
4 begin
5 with frmdatapool.qry需要做的事 do
6 begin
7 close;
8 sql.text := 'select * from 需要做的事 order by '+column.fieldname+' asc';
9 open;
10 end;
11 end else begin
12 with frmdatapool.qry需要做的事 do
13 begin
14 close;
15 sql.text := 'select * from 需要做的事 order by '+column.fieldname+' desc';
16 open;
17 end;
18 end;
19 end;
單擊 DBGrid 標題實現資料自動排序
var i integer begin for i 1 to dbgrid1.columns.count do begin 恢復所有標題字型為預設 dbgrid1.columns i 1 title.font.color clwindowtext dbgrid1.columns i 1 title....
DBGrid點選標題欄實現自動排序功能
通過adoquery控制項的sort屬性，配合dbgrid的ontitleclick事件，可以方便地實現此功能。sort屬性可以讓活動資料集按指定的字段進行排序，與sql語句order後面的寫法一樣 公升序asc 降序desc form1 adoconnection1 tadoconnection ...
點選Ehlib列標題的快速排序方法
ehlib3.0以後的版本雖然支援排序功能，但不支援帶有order by的sql語句，而且排序很慢 我寫的這個排序函式，利用ado的sort方法，排序很快，幾萬條資料也是很快。該函式支援lookup欄位排序，不支援計算字段排序，因為計算字段值在記憶體裡高速運算。排序分為 公升序 降序和預設三種，支援...