文件名称:Delphi TStringList 排序代码.rar
文件大小:40KB
文件格式:RAR
更新时间:2022-07-30 13:09:39
Delphi源码-算法实例
Delphi中的TStringList 排序算法实例代码,功能: 对保存在多个 TStringList 中的数据进行排序,支持按数字,日期,文字进行排序,支持顺序和倒序排序。 procedure MyStringsCustomSort(var aData: TSortData; SortIndex, SortType: Integer; SortFlg: Bool); //-------排列字符串组单元-------- //SortIndex 要排列的 数据行 ID //SortType 排列类型 0 大小, 1 时间,3 文字 //SortFlg 顺序还是反序
【文件预览】:
codesc.net
----TStringList排序()
--------Project1.~dpr(268B)
--------Project1.res(876B)
--------MyTStringsCustomSort.~pas(4KB)
--------Unit1.~dfm(1KB)
--------Unit1.dfm(2KB)
--------Unit1.ddp(51B)
--------Project1.cfg(538B)
--------MyTStringsCustomSort.dcu(4KB)
--------Unit1.pas(2KB)
--------Unit1.~ddp(51B)
--------Project1.dpr(243B)
--------Project1.dof(2KB)
--------Unit1.~pas(2KB)
--------Unit1.dcu(6KB)
--------Form.JPG(30KB)
--------readme.txt(364B)
--------MyTStringsCustomSort.pas(4KB)