delphi 中 怎样在d:\下创建一个名为 xx.txt的文本文件呢 ？

Question

delphi 中 怎样在d:\下创建一个名为 xx.txt的文本文件呢 ？谢谢

Answer 1

      with TStringList.Create do try
        Text := 'text里的内容';
        SaveToFile(d:\abc.txt);
      finally
        Free;
      end;

Answer 2

var
  sys: textfile;assignfile(sys, 'd:\xx.txt');
 rewrite(sys);
 closefile(sys);

Answer 3

assignfile(sys, 'd:\xx.txt'); //原先已有这个文件，所以用这个来进行打开SaveToFile(d:\abc.txt); //原先是没有这个文件的，所以可以用这个来保存的同时创建了你要的文件