代码之家 › 专栏 › 技术社区 › Mawg says reinstate Monica

同时处理Unix和DOS文件

delphi

Mawg says reinstate Monica · 技术社区 · 13 年前

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

处理两个行尾的最简单方法是什么?

也就是说,对于每一行,我都想得到一个字符串,该字符串的末尾被剥去。

1 回复 | 直到 13 年前

Ken White 13 年前

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.

推荐文章