向高手求救:I/O ERROR 问题!急啊!

Question

各位高手,我的程序昨天都还好好的,可今天运行时(没有修改过啊)却出现如下错误:
I/O ERROR 32!请问这到底是怎么回事啊!还有,谁能给我列一下I/O ERROR 的错误代码及含义与解决方法啊!那我将不尽感激了!
    我的程序代码如下:
procedure TClientSetupForm.BitBtn1Click(Sender: TObject);
var
   ServerAddressFile:System.TextFile;
begin
       AssignFile(ServerAddressFile,'ServerAddress.dat');
       rewrite(ServerAddressFile);
       writeln(ServerAddressFile,Trim(ClientSetupForm.Edit1.Text));
       CloseFile(ServerAddressFile);
end;

Answer 1

ServerAddress.dat
该文件在什么位置？和当前程序在同一目录吗？

Answer 2

检查一下serveraddress。dat的文件属性看看。程序应当没有问题的。如果是nt类型的话或者其他操作系统，检查一下权限的问题。
或者，如果你上次运行的时候程序出错，那么可能是上次没有执行CloseFile，因此下次就出错，你重新启动计算机试试。

Answer 3

该文件和当前程序在同一目录,ServerAddress.dat的属性是只有存档,用的是Windows2000 专业版,一直都是用的Administrator用户.计算机重新启动过几次都不行,而且我将ServerAddress.dat删除后执行程序就没问题,但再次执行就又出现同样的错误提示!ServerAddress.dat没有只读和隐藏属性!

Answer 4

我在补充一点,另外一个程序用的语句也是这样,也是同一机器,同一运行环境,但就没出错,而且用
DELPHI5.0 就没出现过这种情况!我现在用的是DELPHI6.0 企业版!