在Delphi 下将字符串保存到磁盘

在 Delphi 下将字符串保存到磁盘的方法如下：

首先，需要创建一个文件流对象，用于操作文件。

var
  fs: TFileStream;

然后，创建一个字符串变量，用于存储要保存到磁盘的字符串。

var
  str: string;

接下来，打开文件流对象，并指定要保存的文件路径和名称。

fs := TFileStream.Create('C:\test.txt', fmCreate);

将字符串转换为字节数组，并将字节数组写入文件流对象。

var
  bytes: TBytes;

SetLength(bytes, Length(str) * SizeOf(Char));
Move(str[1], bytes[0], Length(str) * SizeOf(Char));
fs.Write(bytes[0], Length(bytes));

最后，关闭文件流对象。

fs.Free;

完整的代码示例如下：

var
  fs: TFileStream;
  str: string;
  bytes: TBytes;

str := 'Hello, world!';
fs := TFileStream.Create('C:\test.txt', fmCreate);
SetLength(bytes, Length(str) * SizeOf(Char));
Move(str[1], bytes[0], Length(str) * SizeOf(Char));
fs.Write(bytes[0], Length(bytes));
fs.Free;

这段代码将字符串 "Hello, world!" 保存到 C:\test.txt 文件中。