Delphi删除文件 - 显示消息文件正忙

Fed*_*ina 9 delphi winapi

我有一个应用程序,允许对文件执行一些基本操作,如打开和删除.当有人试图删除在任何其他应用程序中打开的文件时,如何显示与下面的屏幕截图相同的窗口消息?

在此输入图像描述

Dav*_*nan 14

使用SHFileOperationIFileOperation删除文件.这将通过shell使用的相同代码进行路由,并且假设您不禁用错误UI,那么在发生故障时您将收到标准对话框.