delphi 怎么删除正在使用中的文件
答案:2 悬赏:30 手机版
解决时间 2021-02-12 20:42
- 提问者网友：寂寞梧桐
- 2021-02-12 07:52
delphi 怎么删除正在使用中的文件
最佳答案
- 五星知识达人网友：何以畏孤独
- 2021-02-12 08:07
使用CreateFile函数来判断文件是否打开，编写以下函数就可以判断文件是否已打开了，代码如下：
function IsFileInUse(AName: string): boolean;
var
hFileRes: HFILE;
begin
Result := False;
if not FileExists(AName) then exit;
function IsFileInUse(AName: string): boolean;
var
hFileRes: HFILE;
begin
Result := False;
if not FileExists(AName) then exit;
全部回答
- 1楼网友：佘樂
- 2021-02-12 08:38
try deletefile('文件路径和文件名'); except showmessage('error'); end; 直接删的话,就用上面这段代码,已经考虑到了如果当文件不存在时的情况.
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯