各位高手,谁能告诉我,当我通过adoquery将数据库中的数据显示用dbgrid显示出来,我想点击每列的时候,就会自动的排序!
在线等候!
在线等候!
解决方案 »
- WaitForSingleObject 用于当前程序参数问题~~~
- 请问如何给TdxBarSubItem着背景色?
- 新手提问:关于线程Terminated的问题!
- 托盘程序问题
- 一个关于多用户文件传输的问题
- 怎样在DELPHI里面写程序取到RAVE报表预览有多少页以及怎样取到最后一页
- 提个老问题:不用控件用ADO分别给出连接MDB和SQL7.0或者SQL2000的方法,多谢多谢各位大侠!
- 请问这种情况下,sql语句怎么写?
- FastReport做分组报表时遇到的问题
- 如何动态改变TQUERY中的SQL的查询语句?
- FastReport2.5打印数据库中的图片问题,急...在线等待.....
- 我安装win2003后,加装了一块硬盘,却在资源管理器无法显示,其属性显示未用、可用空间均为0,但在98下正常。
写在onclick事件里面
然后在adoquery中加入 order by column参数 就可以了
设置:daasource.dataset:=adoquery;
dbgrid.datasource=datasoruc;
在OnClick事件中:
with adoquery1 do
begin
close;
sql.clear;
sql.add('select * from sub0 order by 字段名');
open;
end;
procedure TfrmEhlib.dgeStoreTitleBtnClick(Sender: TObject; ACol: Integer;
Column: TColumnEh);
begin
if column.Title.SortMarker = smUpEh then
begin
aqStore.Sort := column.FieldName + ' DESC';
column.Title.SortMarker := smDownEh;
end
else
begin
aqStore.Sort := column.FieldName + ' ASC';
column.Title.SortMarker := smUpEh;
end;
end;
我 试试秋风的
adoquery1.sort:=column.fieldname+' asc' ;// ' desc'
adoquery1.filtered:=true;