tstringlist的一个方法customsort()中的参数是什么?它的作用是!我看了帮助但是不是很懂请指点!
解决方案 »
- 如何通过代码检查本机是否已安装SQLServer数据库?
- 把已有文件流压缩到数据库表里。。。。
- 关于delphi的设置,在代码状态栏直接显示错误的怎么设置?
- delphi设计报表用什么控件!
- 怎么把execl导入Access数据库?
- 如何一次过让程序里面所有的form的字体都为宋体
- 任命windindance为开发语言大版主
- 如何在ListView(Report方式)不同的Cell中放置控件?求教!
- 如何制作游戏外挂例如(传奇外挂)
- 针对delphi 企业级应用软件开发,主要应该掌握ORACLE哪些方面的知识
- 请问那位仁兄有fastreport2.47的注册码?高分相送!!
- 请教应用于ODBC的SQL语句里,日期/字符串的转换函数?
function QckSort(List: TStringList; Index1, Index2: Integer): Integer;
begin
if List[Index1] > List[Index2] then Result := 1
else if List[Index1] < List[Index2] then Result := -1
else Result := 0;
end;//表示TStringList的所有项按字母升序排列
调用他:
var
StrList: TStringList;
begin
StrList := TStringList.Create;
//...
StrList.CustomSort(QckSort);
end;—————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
—————————————————————————————————