写文件时提示I/O error?

Question

代码如下：
        FileName := trim(ProgramCurrentPath)+'\lib\Imes.dat';
        assignfile(MyTextFile,filename);
        rewrite(MyTextFile);
        writeln(MyTextFile,ComboBox1.text);
        closefile(MytextFile);写文件时提示I/O error 32 ?
怎么解决？

Answer 1

先看一下FileName是不是合法的文件名.
        FileName := trim(ProgramCurrentPath)+'\lib\Imes.dat';
        ShowMessage(FileName);
        assignfile(MyTextFile,filename);
        rewrite(MyTextFile);
        writeln(MyTextFile,ComboBox1.text);
        closefile(MytextFile);

Answer 2

为什么要用Trim呢？如果你的程序路径中有空格怎么办？

Answer 3

我想问题就应该出在Trim或者文件类型上面

Answer 4

同意genphone_ru(票票)  也很有可能是文件的属性问题！

Answer 5

我在网上找到的，你看看有没有帮助。值得注意的I/O error     AssignFile(F, fname);     Rewrite(F);     当文件 F 经 Reset(F)打开的情况下, Rewrite(F)会引发一个异常: I/O error 32 反之,经 Rewrite(F)打开, Reset(F)也会引发同一个异常. Reset(F)两次,closefile(F),再Rewrite(F),或反之,也会引发同样异常.