-
Notifications
You must be signed in to change notification settings - Fork 7
/
Copy pathSetupEnvironment.bat
51 lines (47 loc) · 1.51 KB
/
SetupEnvironment.bat
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
@echo off
:: setup following environment variables to point to correct location of external libraries
SET BASEDIR=%CD%
SET BUILD=%BASEDIR%\build
SET REPORTS=%BUILD%\reports
SET PRJDIR=%BASEDIR%\CodeCoverage\Test
SET PRJ=CodeCoverageTests
IF "%LIBS%"=="" SET LIBS=%BASEDIR%\3rdParty
IF "%JCL%"=="" SET JCL=%LIBS%\JCL
IF "%JWAPI%"=="" SET JWAPI=%LIBS%\JWAPI\jwapi2.2a
IF "%JVCL%"=="" SET JVCL=%LIBS%\JVCL
SET DPF=%PROGRAMFILES(X86)%
if "%DPF%"=="" (
SET DPF="%PROGRAMFILES%"
)
IF EXIST "%DPF%\Embarcadero\Studio\18.0\bin\rsvars.bat" (
ECHO Found Delphi 10.1 Berlin
CALL "%DPF%\Embarcadero\Studio\18.0\bin\rsvars.bat"
) ELSE (
IF EXIST "%DPF%\Embarcadero\Studio\17.0\bin\rsvars.bat" (
ECHO Found Delphi 10 Seattle
CALL "%DPF%\Embarcadero\Studio\17.0\bin\rsvars.bat"
) ELSE (
IF EXIST "%DPF%\Embarcadero\Studio\14.0\bin\rsvars.bat" (
ECHO Found Delphi XE6
CALL "%DPF%\Embarcadero\Studio\14.0\bin\rsvars.bat"
) ELSE (
:: check for Delphi XE2
IF EXIST "%DPF%\Embarcadero\RAD Studio\9.0\bin\rsvars.bat" (
ECHO Found Delphi XE2
CALL "%DPF%\Embarcadero\RAD Studio\9.0\bin\rsvars.bat"
) ELSE (
:: Delphi 2010
IF EXIST "%DPF%\Embarcadero\RAD Studio\7.0\bin\rsvars.bat" (
ECHO Found Delphi 2010
CALL "%DPF%\Embarcadero\RAD Studio\7.0\bin\rsvars.bat"
) ELSE (
:: Delphi 2009
IF EXIST "%DPF%\CodeGear\RAD Studio\6.0\bin\rsvars.bat" (
ECHO Found Delphi 2009
CALL "%DPF%\CodeGear\RAD Studio\6.0\bin\rsvars.bat"
)
)
)
)
)
)