DBGrid或 DBGRIDEH能自动排序吗? 很多表格,只要点击某个Title,表的内容就能自动排序,那么DBGrid或DBGRIDEH可以实现吗?我说的是它们有没有这样的属性(Properties)可以设置,不用代码控制。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 不能自动排序,你应该在点击后找出用户所点击的字段名,并生成相应的select ... order by ... SQL语句再取一次数据! 具体讲是dbgrideh的哪个属性,如何设置???????? 1 、设置dbgrideh控件的autosorting为true;2、在ontitlebuttonclick事件里xieruprocedure TFrm_Intowarehouse.DBGridEh1TitleBtnClick(Sender: TObject; ACol: Integer; Column: TColumnEh);begin case column.Title.SortMarker of smdowneh : ado_intowarehouse.Sort := column.FieldName + ' DESC'; smupeh : ado_intowarehouse.Sort := column.FieldName; smnoneeh : ado_intowarehouse.Sort := ''; end;end; 好像还要设置一些titlebutton属性之类的;一时没找到;你看下; 这个问题再简单不过了。单击title的时候,按所点击的列排序只要一句代码:AdoQuery1.Sort:=Column.fieldname+' desc';搞定! TcxTreeView的用法 请问怎么使焦点始终在当前窗体! ◆◆谁能帮我解决这个问题,分不够还可以加◆◆ 写流文件问题 在fastReport中难道不能自定义纸张大小的问题? 大家好,我是Delphi新手,如何最大安装delphi7 delphi中调用PrinterIndex指定打印机打印的问题 怎样把文件导入Access数据库里,又怎样取出来另存?? 如何卸载MDAC2.61 征求答案:都有哪些著名软件是用delphi开发的 参与有分,详细说明者另开贴加200分 请教高手:如何调用API屏蔽掉系统的屏保,休眠等
2、在ontitlebuttonclick事件里xieruprocedure TFrm_Intowarehouse.DBGridEh1TitleBtnClick(Sender: TObject;
ACol: Integer; Column: TColumnEh);
begin
case column.Title.SortMarker of
smdowneh : ado_intowarehouse.Sort := column.FieldName + ' DESC';
smupeh : ado_intowarehouse.Sort := column.FieldName;
smnoneeh : ado_intowarehouse.Sort := '';
end;
end;
一时没找到;你看下;
单击title的时候,按所点击的列排序只要一句代码:AdoQuery1.Sort:=Column.fieldname+' desc';搞定!