如何使用FileWrite

Question

请问如何使用FileWrite在写入文件的时候让内容换行？？？？

Answer 1

var
  FileHandle: Integer;
  Buffer: PChar;
begin
  FileHandle := FileCreate('e:\a.txt');
  Buffer := 'line1'#13#10'line2';
  FileWrite(FileHandle, Buffer^, Length(Buffer));
  FileClose(FileHandle);
end;

Answer 2

不过请问Buffer^是什么意思呢？可以不用^吗？

Answer 3

你这样试试看行不
FileWrite(FileHandle, Buffer[1], Length(Buffer));