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;