删除Delphi临时文件的Bat

删除Delphi临时文件的Bat&＃xff0c;保存成Bat文件&＃xff0c;请注意以下代码同时删除了*.dcu文件。

 Rem Delete Delphi temporary file
Rem ****************************
&＃64;echo Delete Delphi temporary file
&＃64;dir/w/s *.~* *.dcu
&＃64;echo 以上为当前目录及子目录临时文件,请按任意键确认删除!!!
&＃64;pause
&＃64;for /r . %%a in (.) do &＃64;if exist "%%a\*.~*" del "%%a\*.~*"
&＃64;for /r . %%a in (.) do &＃64;if exist "%%a\*.dcu" del "%%a\*.dcu"
&＃64;echo 删除成功!
&＃64;pause
Rem ****************************