当前位置:编程学习 > Delphi >>

在delphi中怎么删除文件

答案:
如果是要删除到回收站的话用   
SHFileOperation(lPSHFILEOPSTRUCT lpFileOp)//这个api函数,这是我从程序截得一段代码
FileName:string;
fos:TSHFileOpStruct;
....
FillChar(fos,SizeOf(fos),0);
with fos do
begin
Wnd:=0;
wFunc:=FO_DELETE;
pFrom:=PChar(FileName);
fFlags:=FOF_ALLOWUNDO or FOF_NOCONFIRMATION;
end;
ShFileOperation(fos);
try     
deletefile('文件路径和文件名');
except
showmessage('error');
end;
直接删的话,就用上面这段代码,已经考虑到了如果当文件不存在时的情况.
啊,晚了一步,两种方法都被说完了。

5555
winexec(pchar(command),sw_show);  用这个命令就可以啦
command 可以是dos命令
例: winexec(pcahr('del 文件名'),sw_show)
这样就达到你要的要求啦

上一个:Delphi与Visual Basic有什么区别?
下一个:delphi 托盘程序问题

CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,