delphi - 对字符串列表进行排序:仅移动或交换项目

Question

在Delphi / Pascal中，我想按字母顺序对TStringList进行排序。但是为此，我只能使用以下两种方法：

移动：将字符串从一个索引位置移动到另一个索引位置，并根据需要在其他字符串周围移动。

交换：交换列表中的两个字符串，由它们的索引位置标识。

我该怎么办？我的想法是循环遍历所有项目并进行如下操作：


lastFirstLetter：=复制（CurrentItem，1，1）
转到下一个项目
currentFirstLetter：=复制（CurrentItem，1，1）
如果ord（currentFirstLetter）

用这两种方法对StringList进行排序的最快方法是什么？顺便说一下，我不能使用sort方法和sorted属性。

Answer 1

您只需移动/交换方法。但是，您有很多算法可供选择！看一下这个网站（通过Google的快速搜索）进行动画比较：http://www.sorting-algorithms.com/

我认为所有这些算法都只使用“移动”，除了堆和仅使用“交换”的快速排序