2019獨角獸企業重金招聘Python工程師標準>>>

以往刪除目錄時，都是用遞歸刪干凈目錄下的文件和子文件夾，如果文件數量大，則刪除速度會很慢
在此直接使用使用API將目錄刪除

function DelDirectory(const Source: string): boolean;
var
??? fo: TSHFILEOPSTRUCT;
begin
??? FillChar(fo, SizeOf(fo), 0);
??? with fo do
??? begin
????? Wnd??? := 0;
????? wFunc := FO_DELETE;
????? pFrom := PChar(Source + #0);
????? pTo??? := #0#0;
????? fFlags := FOF_NOCONFIRMATION + FOF_SILENT;
??? end;
??? Result := (SHFileOperation(fo) = 0);
end;

轉載于:https://my.oschina.net/renyuansoft/blog/13776

創作挑戰賽新人創作獎勵來咯，堅持創作打卡瓜分現金大獎

總結

以上是生活随笔為你收集整理的Delphi中使用API将目录删除函数的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。