【问题标题】:Alphabetical order of strings in a TextFile文本文件中字符串的字母顺序
【发布时间】:2015-03-31 08:20:40
【问题描述】:

我以随机顺序在文本文件中获得了这个名称列表....如何按字母顺序 (delphi) 对其进行排序?我需要将它保存在同一个文本文件中。 文件如下所示:

Smith
Jack
Klein
Elliot

【问题讨论】:

  • 你有什么尝试吗?
  • 是的....但我是一个真正的初学者

标签: arrays delphi sorting alphabet


【解决方案1】:

我会使用 TStringlist,因为它有一个用于排序的内置函数。像这样的:

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

【讨论】:

  • 可能是因为我使用的是控制台
  • 在uses子句中添加类
【解决方案2】:

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

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

【讨论】:

  • 可能是因为我使用的是控制台
  • 要使用TstringList,在uses语句中添加Classes
  • 不要害怕邪恶的关键字 - 学会正确地烹饪它们;)这是 with 的最佳应用 - 非常短的独立任务,没有显式(冗余)对象变量。
猜你喜欢
  • 2021-11-05
  • 1970-01-01
  • 2018-01-28
  • 1970-01-01
  • 2014-06-13
  • 1970-01-01
  • 2017-10-04
  • 2022-01-02
  • 2016-04-21
相关资源
最近更新 更多