somefile.txt中有几行文本。
var
Fconfig:textfile;
somestring:string;
otherstring:string;
begin
Assignfile(Fconfig,'c:\somefile.txt');
Reset(Fconfig);
Readln(Fconfig,somestring);
CloseFile(Fconfig);
此后,我又想修改此文件。
Assignfile(Fconfig,'c:\somefile.txt');
rewrite(Fconfig); //出错,i/o error 32
writeln(otherstring);
closefile(Fconfig);
end;
后来,我发现closefile后也不能删除该文件,只有程序退出后才可以删除它。
请问怎么解决,谢谢。
var
Fconfig:textfile;
somestring:string;
otherstring:string;
begin
Assignfile(Fconfig,'c:\somefile.txt');
Reset(Fconfig);
Readln(Fconfig,somestring);
CloseFile(Fconfig);
此后,我又想修改此文件。
Assignfile(Fconfig,'c:\somefile.txt');
rewrite(Fconfig); //出错,i/o error 32
writeln(otherstring);
closefile(Fconfig);
end;
后来,我发现closefile后也不能删除该文件,只有程序退出后才可以删除它。
请问怎么解决,谢谢。
delphi好像没有释放文件句柄,我用D5。需要补丁么?
不过思考的过程还是很有意思的,我想过用c写个dll,再用delphi调用;
今早又发现其实文件也不用每次都关闭,改用“记录文件”,只要seek回去就可以修改。
谢谢大家,实在不好意思。