delphi - Delphi中如何将字符串保存到文本文件中？

Question

创建字符串并将其保存到 .txt 文件中的最简单方法是什么？

Answer 1

使用TStringList。

uses
  Classes, Dialogs; // Classes for TStrings, Dialogs for ShowMessage

var
  Lines: TStrings;
  Line: string;
  FileName: string;
begin
  FileName := 'test.txt';
  Lines := TStringList.Create;
  try
    Lines.Add('First line');
    Lines.Add('Second line');
    Lines.SaveToFile(FileName);
    Lines.LoadFromFile(FileName);
    for Line in Lines do
      ShowMessage(Line);
  finally
    Lines.Free;
  end;
end;

此外，SaveToFile 和 LoadFromFile 可以在 Delphi 2009 及更高版本中采用额外的编码来设置文本编码(Ansi、UTF-8、UTF-16、UTF-16大尾数)。