dbgrid排序问题 不要激发任何事件,可否利用控件自动对dbgrid中的某个字段进行排序。。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 select * from table order by 字段 代码如下:全局 blOrder:boolean; procedure TForm1.DBGrid1TitleClick(Column: TColumn);begin if blOrder then begin ADOQuery1.Sort := Column.FieldName + ' ASC'; dbgrid1.Columns[Column.Field.FieldNo-1].Title.Caption:= Column.FieldName+'▲'; blOrder:=false; end else begin ADOQuery1.Sort := Column.FieldName + ' DESC'; blOrder:=true; dbgrid1.Columns[Column.Field.FieldNo-1].Title.Caption:= Column.FieldName+'▼'; end;end; 本身通过查询该字段的SQL语句就有默认排序,通过ADO组件显示到DBGRID就有默认顺序,如果你想在DBGRID上排序显示,又不触发事件,只有写复杂的SQL脚本,通过脚本来实现排序,那么现实出来的必然就是排序顺序。DBGRID本身支持SORT排序,写代码是为了实现目的,方法很多,没有必要就走限定某一条件的路 本身通过查询该字段的SQL语句就有默认排序,通过ADO组件显示到DBGRID就有默认顺序 ,这一句不太明白,是否在adoquery中写SQL语句?这个我试过,行不通! 怎么让自动运行的窗体不闪一下才关闭? 求delph7.0+SQLserver师傅一名(深圳)(龙华更好) 关于stringgrid的默认选中问题! 关于WEB开发的问题。请大家帮助! 大家帮我看看我这样的系统应该怎样处理? 怎样使用自己定制的光标呢,我试过不行,请问如何解决 TreeView的问题 在 win98与win2000下报表数据显示为何不一样? 控件装好后用的时候,提示少.dcu为甚么? DBGride 中的 问一个句柄的问题
全局 blOrder:boolean;
procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin
if blOrder then
begin
ADOQuery1.Sort := Column.FieldName + ' ASC';
dbgrid1.Columns[Column.Field.FieldNo-1].Title.Caption:= Column.FieldName+'▲';
blOrder:=false;
end
else
begin
ADOQuery1.Sort := Column.FieldName + ' DESC';
blOrder:=true;
dbgrid1.Columns[Column.Field.FieldNo-1].Title.Caption:= Column.FieldName+'▼';
end;
end;
本身通过查询该字段的SQL语句就有默认排序,通过ADO组件显示到DBGRID就有默认顺序,如果你想
在DBGRID上排序显示,又不触发事件,只有写复杂的SQL脚本,通过脚本来实现排序,那么现实出来的
必然就是排序顺序。DBGRID本身支持SORT排序,写代码是为了实现目的,方法很多,没有必要就走限定
某一条件的路