delphi - 处理Unix和DOS文件

我的应用程序文本文件有时在WIndwos系统（有时是Linux）上生成。

处理两个行尾的最省力方法是什么？

就是说，对于每一行，我都希望得到一个字符串，该字符串的结尾应去除掉。

最佳答案

TStringList可以很好地处理Windows和Linux的行尾。

program TestLFs;

{$APPTYPE CONSOLE}
uses
  Classes;

var
  SL: TStringList;
  s: string;
begin
  SL := TStringList.Create;
  try
    SL.LoadFromFile('YourUnixFile.txt');
    for s in SL do
      WriteLn(s);
    SL.LoadFromFile('YourWindowsFile.txt');
    for s in SL do
      WriteLn(s);
  finally
    SL.Free;
  end;
  ReadLn;
end.

关于delphi - 处理Unix和DOS文件，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/12031076/