Delphi里面的目录删除函数，删除不了目录下含有子目录或者文件的目录，请参考如下。
if(TDirectory.Exists('c:\wmp')) then ShellExecute(0,nil,'cmd.exe','/c rd c:\wmp /s /q',nil,SW_HIDE);
用的是powershell也就是之前的dos命令
