Question

Pascal调用系统命令删除文件夹

求代码
free pascal

Answer 1

pascal的system单元中的rmdir()过程可以删除指定的空目录。
也可以用exec()过程调用操作系统的RD命令、deltree命令删除指定的目录。

追问

求样例代码（系统指令）

追答

rmdir()过程：

program test1;
begin
rmdir('c:\temp');
end.

exec()过程：
program test2;
uses dos;
begin
exec(getenv('comspec'),'/c rd c:\temp');

exec(getenv('comspec'),'/c deltree c:\temp');

end.

使用deltree目录风险较高 ！！！