delphi 创建一个纯文本文件

在写程序的时候，遇到了创建文件的问题，比如一个pp.bat文件，可以用来运行。API的操作很全面，但是也相当复杂，要处理很多错误之类的。所以查了简单的方法供大家参考：

var
  f:textfile;//与TP中text类型相同
begin
  assignfile(f,'c:\pp.bat');//TP中的assign
  rewrite(f);
  append(f);//TP中如不存在pp.bat这个文件，也同样可以直接创立，但在delphi中需要增加此语句
  writeln(f,'hello！');

  closefile(f);
end;