Delphi中的TStringList排序算法实例代码，功能:对保存在多个TStringList中的数据进行排序，支持按数字，日期，文字进行排序，支持顺序和倒序排序。 　　procedureMyStringsCustomSort(varaData:TSortData;SortIndex,SortType:Integer;SortFlg:Bool); 　　//-------排列字符串组单元-------- 　　//SortIndex要排列的数据行ID 　　//SortType排列类型0大小,1时间,3文字 　　//SortFlg顺序还是反序