文本文件不如用TStrings方便(文件不大)
或TFileStream(大文件)

解决方案 »

  1.   

    你可以用如下方法: 
      try
        ...  finally
       closefile()
      end;
      

  2.   

    begin
      Assignfile(f,'temp.txt') ;
      rewrite(f);
      writeln(f,'this is a test');
      flush(f);
    end;
      

  3.   

    我说了两个条件,一不用tstrings,二不能colsefile,两位怎么还这么回复啊?不过也谢谢两位的回帖,还有别的办法吗?
      

  4.   

    多谢mfc2001(拔剑茫然心四顾),按你的方法,解决!!
    20分够不够?