dbgrideh如何实现点击标题排序

类别:Delphi 点击:0 评论:0 推荐:
 

数据源为adoQuery

1、首先设置dbGridEh里需要排序的字段的Title->Titlebutton属性为true

2、设置dgGridEh的optionsEh->dbhautoSortMarking属性为true

3、在dbGridEh的ontitleButtonClick事件里面判断。

procedure Tfrmmain.dbgGridEh1TitleBtnClick(Sender: TObject; ACol: Integer;
  Column: TColumnEh);
begin
      if column.Title.SortMarker=smdowneh then
         adoQuery1.Sort :=column.FieldName
   else
         adoQuery1.Sort :=column.FieldName +' DESC';

本文地址:http://com.8s8s.com/it/it4572.htm