Geliştiricinin Bilgisayarı Çökmemeli

[Fesih ARSLAN]

Geliştirci ortamının yedeklenmesi ve geri yüklenmesi ile ilgili detaylı bir konu paylaşmıştım. Bu sistemde Delphi'yi kurduktan sonra ekstra bir kuruluma ihtiyaç duymuyorsunuz. Tüm tanımlamalar registry ve path'ler ile yapılıyor. Tüm bu işlemleri bir batch dosyasına alarak saniyeler içerisinde gerçekleştirebilirsiniz.
Bu kapsamda, 2013'te hazırladığım bir batch dosyası:

@echo off
:: Tanımlamalar**********************************************************************
:: Devart
set YolEmbarcaderoBin="C:\Program Files (x86)\Embarcadero\RAD Studio\11.0\bin"
::set YOlDevartKaynak1="Y:\Comp\Devart v25112011\IBDAC for RAD Studio XE2 v4.1.3\Bin\Win32"
::set YOlDevartKaynak2="Y:\Comp\Devart v25112011\ODAC for RAD Studio XE2 v8.1.3\Bin\Win32"
::set YOlDevartKaynak3="Y:\Comp\Devart v25112011\SDAC for RAD Studio XE2 v6.1.3\Bin\Win32"
set YOlDevartKaynak4="Y:\Comp\UniDAC for RAD Studio XE4\Bin\Win32"
:: Delphi IDE
set YolIDEHedef="C:\Users\USER\AppData\Roaming\Embarcadero\BDS\11.0"
set YolIDEKaynak="IDE\11.0"
::Araçlar Tanımlamaları
SET Yol="Araclar"
SET YolDXVCL="Y:\Comp\DevExpress VCL"
SET YolKullaniciDegiskenleri="Y:\Bpl;Y:\Comp\TMS Component Pack v6.9.1.1;Y:\Comp\DevExpress VCL\Library\RS18\Win32\Release;Y:\Comp\FastReport4.14.1\LibD18"
SET YolCnPack="C:\Program Files (x86)\CnPack\CnWizards"
SET YolRegEmbercadero="HKEY_CURRENT_USER\Software\Embarcadero\BDS\11.0"
::Tanımlamalar Sonu *****************************************************************
ECHO.
ECHO.
::
::  
ECHO EMBARCADERO REGISTRY ISLEMLERI YAPILIYOR 
ECHO.  
Echo Known Packages,Library ve Experts Anahtarlari Siliniyor...
REG DELETE %YolRegEmbercadero%\Experts /f
REG DELETE %YolRegEmbercadero%\Form Design /f
REG DELETE %YolRegEmbercadero%\Known Packages /f
REG DELETE %YolRegEmbercadero%\Library /f
REG DELETE %YolRegEmbercadero%\Toolbars /f
REG DELETE %YolRegEmbercadero%\ToolForm /f

Echo Known Packages,Library,Toolbars ve Experts Anahtarlari Silindi...
ECHO.                                       
ECHO.
ECHO YAPIM FESiH ARSLAN - 2013 ERZURUM
ECHO.                                       
ECHO. 
ECHO ORTAM DEGiSKENLERi EKLEMELERi YAPILIYOR  
ECHO.                                   
Echo Ortam Degiskenleri/Sistem Degiskenlerine (DXVCL) Ekleme Yapiliyor...
REG ADD "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment" /v "DXVCL" /t REG_SZ /d %YolDXVCL% /f
ECHO. 
Echo Ortam Degiskenleri/Kullanici Degiskenlerine (Path) Ekleme Yapiliyor...
REG ADD "HKEY_CURRENT_USER\Environment" /v "Path" /t REG_SZ /d %YolKullaniciDegiskenleri% /f
ECHO. 
ECHO.
::
::
ECHO DEVART COMPONENT KAYNAK DOSYALARI KOPYALANIYOR                                      
ECHO. 
:: @copy /y %YOlDevartKaynak1%\*.* %YolEmbarcaderoBin%\*.*
:: @copy /y %YOlDevartKaynak2%\*.* %YolEmbarcaderoBin%\*.*
:: @copy /y %YOlDevartKaynak3%\*.* %YolEmbarcaderoBin%\*.*
@copy /y %YOlDevartKaynak4%\*.* %YolEmbarcaderoBin%\*.*
ECHO.                                       
ECHO.
::
::
ECHO DELPHI IDE AYARLARI YAPILANDIRILIYOR
ECHO.                                       
copy /y %YolIDEKaynak%\*.* %YolIDEHedef%\*.*
ECHO.                                       
ECHO.
::
::
ECHO GEREKLi OLAN ARACLAR KURULUYOR
ECHO.                                       
ECHO OFF
ECHO DB Monitor Kuruluyor...
ECHO. 
start "" /wait %Yol%\dbmon3.exe 
set SETUP_STATUS=%ERRORLEVEL%
echo %SETUP_STATUS%
if %SETUP_STATUS%==0 echo DBMonitor Kuruldu...
if not %SETUP_STATUS%==0  echo Yukleme sirasinda bir hata olustu veya iptal edildi
ECHO.                                       
ECHO.
ECHO CnPack Kuruluyor...
ECHO. 
start "" /wait %Yol%\CnWizards_0.9.9.651_Unstable.exe 
set SETUP_STATUS=%ERRORLEVEL%
echo %SETUP_STATUS%
if %SETUP_STATUS%==0 echo CnPack Kuruldu...
if not %SETUP_STATUS%==0  echo Yukleme sirasinda bir hata olustu veya iptal edildi
ECHO.                                       
ECHO.
::
::
ECHO CnPack Ayarları Kuruluyor...
ECHO. 
start "" /wait %YolCnPack%\CnConfigIO.exe
set SETUP_STATUS=%ERRORLEVEL%
echo %SETUP_STATUS%
if %SETUP_STATUS%==0 echo CnPack Ayarları Yüklendi...
if not %SETUP_STATUS%==0  echo Yukleme sirasinda bir hata olustu veya iptal edildi
ECHO.                                      
ECHO.
::
::
::ECHO DEVART\ODAC ORATOOLS AYARLARI YAPILIYOR
::ECHO.                                       
::REG ADD "HKEY_CURRENT_USER\Software\Devart\Odac" /v "DevAskNoAddin" /t REG_SZ /d "0" /f
::ECHO.                                       
::ECHO.
::
::
ECHO DELPHI PROJE OTOMATiK OLARAK KAYDETME AYARLARI YAPILIYOR
ECHO.                                       
REG ADD %YolRegEmbercadero%\Auto Save /v "Editor Files" /t REG_SZ /d "True" /f
REG ADD %YolRegEmbercadero%\Auto Save /v "Desktop" /t REG_SZ /d "True" /f
ECHO.
ECHO.
::
::  
ECHO EMBARCADERO REGISTRY ISLEMLERI YAPILIYOR 
ECHO.  
Echo Experts Anahtari Olusturuluyor...
REGEDIT.EXE /s Reg_64Bit_x86\Experts.reg
Echo Form Design Anahtari Olusturuluyor...
REGEDIT.EXE /s Reg_64Bit_x86\FormDesign.reg
Echo Known Packages Anahtari Olusturuluyor...
REGEDIT.EXE /s Reg_64Bit_x86\KnownPackages.reg
Echo Library Anahtari Olusturuluyor...
REGEDIT.EXE /s Reg_64Bit_x86\Library.reg
Echo Toolbars Anahtari Olusturuluyor...
REGEDIT.EXE /s Reg_64Bit_x86\Toolbars.reg
Echo ToolForm Anahtari Olusturuluyor...
REGEDIT.EXE /s Reg_64Bit_x86\ToolForm.reg

pause
::Echo Ortam Degiskenleri/Sistem Degiskenlerine (Path) Ekleme Yapiliyor...
::REG ADD "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment" /v "Path" /t REG_SZ /d "%PATH%;c:\newpath" /f
::ECHO.