mirror of
https://github.com/HeidiSQL/HeidiSQL.git
synced 2025-08-26 03:01:07 +08:00
54a7930045
* remove Detours package, move code to /source/detours/ * remove Detours code from /source/vcl-styles-utils/delphi-detours-library/, so we have only one version * remove Vcl.FormsFix.pas, as the bugs I fixed with that are most likely fixed with the move to Delphi 10. See https://www.heidisql.com/forum.php?t=19141 for the original bug report. * only vcl-styles-utils uses the Detours lib from now on
35 lines
973 B
Batchfile
35 lines
973 B
Batchfile
rem *****************************************
|
|
rem * Delphi CleanUp Batch. *
|
|
rem * *
|
|
rem * Clean identcache,local,dcu,exe, *
|
|
rem * map,drc files. *
|
|
rem * Clean hidden __history folder. *
|
|
rem * *
|
|
rem * Author: Mahdi Safsafi *
|
|
rem *****************************************
|
|
|
|
@echo off
|
|
Setlocal EnableDelayedExpansion
|
|
|
|
Del "*.identcache" /s/q
|
|
Del "*.local" /s/q
|
|
Del "*.dcu" /s/q
|
|
Del "*.exe" /s/q
|
|
Del "*.drc" /s/q
|
|
Del "*.map" /s/q
|
|
|
|
set mustdel=false
|
|
For /r %%f in (.) do (
|
|
set "mustdel=false"
|
|
if %%~nf==Win32 (
|
|
if exist "%%~ff\Debug\" set "mustdel=true"
|
|
if exist "%%~ff\Release\" set "mustdel=true"
|
|
) else if %%~nf==Win64 (
|
|
if exist "%%~ff\Debug\" set "mustdel=true"
|
|
if exist "%%~ff\Release\" set "mustdel=true"
|
|
)
|
|
if %%~nf==__history set "mustdel=true"
|
|
if !mustdel!==true (
|
|
if exist "%%~ff" rd /s/q "%%~ff"
|
|
)
|
|
) |