GeezerVison is showing github.com — delphi7-batch-build-scripts/BuildMyAppDist.bat at master · r3code/delphi7-batch-build-scripts

Expand file tree

BuildMyAppDist.bat

Copy path

More file actions

Latest commit

History

66 lines (52 loc) · 1.37 KB

BuildMyAppDist.bat

Copy path

File metadata and controls

66 lines (52 loc) · 1.37 KB

Raw

Copy raw file

Download raw file

Open symbols panel

Edit and raw actions

REM CommandInterpreter: $(COMSPEC)

@echo off

rem Script name

set me=%~n0

set SCRIPT_DIR=%~dp0

IF %SCRIPT_DIR:~-1%==\ set SCRIPT_DIR=%SCRIPT_DIR:~0,-1%

:SetGeneralsettings

set ProjectName=MyApp

:SetPathToProjectFiles

set ProjectResources=%SCRIPT_DIR%\Resources

set Sources=%SCRIPT_DIR%\Source

:startBuild

echo:

echo %me% - Check all files ready to be publised then build

echo -------------------------------------------------------------------------------

echo:

:CheckChangelogUpdated

echo CheckChangelogUpdated...

setlocal

call "%SCRIPT_DIR%\CheckChangelogUpdated.bat" "%ProjectResources%\versioninfo\MyAppVersionInfo.rc" "%SCRIPT_DIR%\doc\Changelog.txt"

endlocal

if errorlevel 1 (

set ERRSTR=CheckChangelogUpdated failed

goto :error

)

:buildProject

setlocal

call "%SCRIPT_DIR%\BuildMyApp.bat"

endlocal

if errorlevel 1 (

set ERRSTR=Build Error

goto :error

)

:allOK

rem When all OK

echo:

echo -------------------------------------------------------------------------------

echo %me%: OK

echo ===============================================================================

echo:

set errorCode=0

goto :end

:error

echo:

echo #############################################################################

echo %me%: FAIL %ERRSTR%

echo =============================================================================

set errorCode=1

goto :end

:end

exit /b %errorCode%