为什么文本文件输出为空？

Question

assignfile(outfile,filename);
  if not(FileExists(filename)) then
    rewrite(outfile)
  else
    reset(outfile);
  writeln(mCurFile.mFileName);
closefile(outfile);

Answer 1

writeln(outfile, mCurFile.mFileName);

Answer 2

else后面有问题，如果文件存在，用reset是无法写文件的。

Answer 3

是了，reset改为append
assignfile(outfile,filename);
  if not(FileExists(filename)) then
    rewrite(outfile)
  else
    append(outfile);
  writeln(outfile, mCurFile.mFileName);
closefile(outfile);