deletefile()不能删除文件 (50分)

  • 主题发起人 主题发起人 ynxw
  • 开始时间 开始时间
Y

ynxw

Unregistered / Unconfirmed
GUEST, unregistred user!
名为 txser的win2000 上有共享文件夹 img ,里面有一个文件112112944.jpg
deletefile('//txser/img/112112944.jpg'),后没有报错,文件依然存在
img 和 112112944.jpg 为everyone完全控制
copyfile能够成功的将文件拷贝上去,就是不能deletefile.
 
假设要删除的文件名为“xxx”

uses
sysutil;

var
f:file;

begin
assignfile(f,'xxx');
filemode:=1;
rewrite(f);
closefile(f);
deletefile('xxx');
end.
 
不好意思刚才打错了,原本的路径就是'//txser/img/112112944.jpg',这样也不行
rewrite(f);报错'file access denied
 
哦?你用API,DeleteFile,再GetLastError看看。。
 
我用 try...except
on e:exception do
showmessage(e.classname+e.message);
但并没执行except
 
问题解决了filesetattr('//Txser/img/xxxx',faArchive);才能deletefile
 
多人接受答案了。
 
deletefile('txser//img/112112944.jpg')
改为
deletefile('//txser/img/112112944.jpg')试试
现不行就看看文件是什么属性的
 

Similar threads

回复
0
查看
1K
不得闲
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部