点击delphi中wwDBGrid标题进行排序

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

3.http://bbs.csdn.net/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/p/2783410.html