求一个字符串 组的排序算法,能用delphi写最好 如题,希望高手解答 谢谢了 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 如果楼主指得是字符串数组,那么建议楼主了解一下TStringList类,它比String数组功能更丰富:var SS : TStringList;begin SS := TStringList.Create; SS.Add('bbbbbb'); SS.Add('aaaaaa'); SS.Add('dddddd'); SS.Add('cccccc'); ShowMessage(Format('%s'#10'%s'#10'%s'#10'%s',[ SS[0],SS[1],SS[2],SS[3] ]));//排序前 SS.Sort; //排序 ShowMessage(Format('%s'#10'%s'#10'%s'#10'%s',[ SS[0],SS[1],SS[2],SS[3] ]));//排序后 SS.Free;end; 用clientdataset如何连接本机access数据库(如**.mdb) 非常奇怪的问题. 十六进制高低位转换为十进制数!高分求助! 只有50分了,别嫌少,QReport中长文本打印的问题 文件保存的问题? 关于Image控件 advstringgrid控件的紀錄的上一條,下一條怎麼做,在線等 投了5分简历,五次面试机会,5次全部通过,现在真的很痛苦~~:)所以散分 !~~~~~ 关闭form的快捷键(比如Esc)怎么设? 请介绍几个delphi的好网站!(资料、技巧、实例、控件)等!来者有分!送完为止! 如何用存储过程保存图片? delphi程序第一次执行程序特别慢 ?
SS : TStringList;
begin
SS := TStringList.Create;
SS.Add('bbbbbb');
SS.Add('aaaaaa');
SS.Add('dddddd');
SS.Add('cccccc');
ShowMessage(Format('%s'#10'%s'#10'%s'#10'%s',[ SS[0],SS[1],SS[2],SS[3] ]));//排序前
SS.Sort; //排序
ShowMessage(Format('%s'#10'%s'#10'%s'#10'%s',[ SS[0],SS[1],SS[2],SS[3] ]));//排序后
SS.Free;
end;