Question

我在一个文本文件中以随机顺序获得了这个名字列表....如何按字母顺序（delphi）对其进行排序？我需要将它保存在同一个文本文件中。文件看起来像这样：

Smith
Jack
Klein
Elliot

Answer 1

我会使用TStringlist，因为它有一个用于排序的buildin函数。像这样：

var
  Stringlist : TStringlist;
begin
  Stringlist := TStringlist.Create;
  StringList.Loadfromfile(MYFILE);
  StringList.sort;
  StringList.saveToFile(MYFILLE);
  StringList.Free;
end;

Answer 2

如果每个单词占用单独的行，最简单的方法是使用StringList类（我将结果保存在另一个文件中以便更安全地调试）

with TStringList.Create do try
  LoadFromfile('text.txt');
  Sort; 
  SaveToFile('sortedtext.txt');
finally
  Free;
end;

文本文件中字符串的字母顺序

2 个答案: