Delphi RemoveDir 删除文件夹

本文整理自网络，侵删。

 //删除文件夹 RemoveDir; RemoveDirectory
var
dir: string;
begin
dir := 'c:\temp';
RemoveDir(dir); //返回 Boolean

//或者用系统 API:
RemoveDirectory(PChar(dir)); //返回 Boolean
end;

========================

function RemoveDir(const Dir: string): Boolean;
begin
{$IFDEF MSWINDOWS}
Result := RemoveDirectory(PChar(Dir));
{$ENDIF}
{$IFDEF LINUX}
Result := __rmdir(PChar(Dir)) = 0;
{$ENDIF}
end;
 

相关阅读 >>

Delphi中使用isuperobject解析json数据

怎样在Delphi中屏蔽flash控件的右键弹出菜单

Delphi2007-Delphi2010 程序不出现在任务栏的方法

Delphi xe6 grid试用结果

Delphi gethomepath - 获取用户程序数据目录

Delphi hex 相关单元

Delphi 单击android上的web浏览器链接以启动Delphi应用程序

Delphi抓取qq聊天窗口实例

crossbow病毒开放源代码-熊猫烧香源始代码

isleapyear：返回给定的年份是否是闰年

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi RemoveDir 删除文件夹