Delphi - 创建text文件并添加数据到文件中

创建文本文件

代码如下：

 1 //创建一个文本文件
 2 procedure CreateTextFile();
 3 var
 4   TF: TextFile; 6 begin  8   AssignFile(TF,'C:\tmp\1.txt');
 9   ReWrite(TF);
10   CloseFile(TF);
11