Unigui 的TUniDBGrid排序功能V3

在V2的基础上继续优化

 

procedure DbGridSortByCol(Column: TUniDBGridColumn; Direction: Boolean);

var SortStr:string;
begin
if Direction then
SortStr := Column.FieldName
else
SortStr := Column.FieldName + ' DESC';

TCustomUniDataSet(TUniDBGrid(Column.Grid).DataSource.DataSet).IndexFieldNames := SortStr ;

end;

 

 免费人力资源管理软件,免费Mes系统,免费仓库管理软件WMS

 

 

http://ehr.kopsoft.cn张家港MES,张家港HR,张家港人力资源,张家港招聘,张家港ehr,张家港生产管理,张家港人事系统,张家港软件,张家港仓库管理,张家港MES,江阴MES,昆山MES,常熟MES,张家港人事,昆山人事,江阴人事,常熟人事,张家港软件,江阴软件,昆山软件,常熟软件,张家港招聘,江阴招聘,常熟招聘,昆山招聘,生产,生产管理系统,仓库管理,Mes系统,WMS,ehr,hr,人事,人力资源系统,人力资源管理系统,软件,程序,框架,招聘,求职,兼职,找工作,免费,张家港,江阴,昆山,常熟