2
0

BuildDemosDelphi.bat 1021 B

1234567891011121314151617181920212223242526272829303132333435
  1. @echo OFF
  2. echo Building Demos using Delphi
  3. set ROOTDIR=..
  4. set DEMOPATH=%ROOTDIR%\Demos\ObjectPascal
  5. set OUTPUT=-E%ROOTDIR%\Demos\Bin
  6. set UNITS=-U%ROOTDIR%\Source -U%ROOTDIR%\Source\JpegLib -U%ROOTDIR%\Source\ZLib -U%ROOTDIR%\Extras\Extensions -U%ROOTDIR%\Extras\Extensions\LibTiff
  7. set UNITS=%UNITS% -U%DEMOPATH%\Common -U%ROOTDIR%\Extras\Extensions\LibTiff
  8. set INCLUDE=-I%ROOTDIR%\Source
  9. set OPTIONS=-B -$D- -$L- -$Y- -DRELEASE
  10. set DEMOSBUILD=0
  11. set DEMOCOUNT=3
  12. call :BUILD Benchmark\Bench.dpr
  13. call :BUILD VampConvert\VampConvert.dpr
  14. call :BUILD VCLImageBrowser\ImgBrowser.dpr
  15. goto END
  16. :BUILD
  17. dcc32 %OPTIONS% %DEMOPATH%\%1 %OUTPUT% %UNITS% %INCLUDE%
  18. if errorlevel 1 (echo Error when building %1) else (set /a DEMOSBUILD+=1)
  19. goto :EOF
  20. :END
  21. if "%DEMOSBUILD%"=="%DEMOCOUNT%" (
  22. echo Build Successful - all %DEMOSBUILD% of %DEMOCOUNT% build
  23. echo
  24. ) else (
  25. echo Errors during building - only %DEMOSBUILD% of %DEMOCOUNT% demos build
  26. echo
  27. )
  28. call Clean.bat