根据Ehlib使用说明之自动排序并显示标记(▽降序△升序),仅设置属性不用写代码实现点击标题头自动排序。
DBGridEh组件可以在标题行单元格中显示小三角形升、降排序标志符图片,在运行时可点击标题行,图片自动切换并做相应排序。
1)设置全部列为排序字段,具体属性设置如下:
DBGridEh.ColumDefValues.Titles.TitleButton:=True;
DBGridEh.[OptionsEh].dghAutoSortMarking属性设为True
DBGridEh.SortLocal:=True;
2)设置部分列为排序字段,具体设置如下
DBGridEh.[OptionsEh].dghAutoSortMarking=True;
DBGridEh.[Columns].[Title].TitleButton=true;
一丝不苟的按照要求设置完成,点击标题显示上下三角标志,但并不自动排序。
反复折腾后,发现不能自动排序是因为其并不自动引用EhlibAdo或EhlibBDE,将该引用手工加入Uses后正常运行。
以上delphi XE10.2+Ehlib9.1通过。