点击delphi中wwDBGrid标题进行排序

  最近有一个小任务要对wwDBGrid中的字段进行排序，对于菜鸟级的人来说，确实是一个头痛的事，还好客户又推迟了两天，于是回家做一个demo。怎么做，只有到网上找了，网上资料还是很丰富的，没有多久就实现了。现在把找到的资料路径发布出来：1.http://cqujsjcyj.iteye.com/blog/424847  2. http://bbs.youkuaiyun.com/topics/60240442 

3.http://bbs.youkuaiyun.com/topics/80383023 

原来只要设置一下就可以了。我用的是 adsbook: TADODataSet; 设置wwDBGrid1的TitleButtons 为true 然后点击它的wwDBGrid1TitleButtonClick事件 在这个事件中写上：

 adsbook.Sort := AFieldName 就可以了，即：

procedure TForm1.wwDBGrid1TitleButtonClick(Sender: TObject;
AFieldName: String);
begin
adsbook.Sort := AFieldName
//adsbook.Sort

end;

学习还是蛮有趣的，只要动手，问题不再是问题。

转载于:https://www.cnblogs.com/annabook/archive/2012/11/22/2783410.html