⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 makedelphi.bat

📁 East make Tray Icon in delphi
💻 BAT
字号:
@echo off
: ---------------------------------------------------------------------
:    WARNING   WARNING    WARNING    WARNING    WARNING    WARNING
:
: Please read the help before using this batch file as there are
: some compulsory parameters
:
: ---------------------------------------------------------------------
cls
if %1!==! goto help

if NOT "%DELDIR%"!==""! goto next
if %2!==! goto help
SET DELDIR=%2
:next
SET DIR=%1
SET ROOT=%DELDIR%
SET DIR2=%3

SET PACKAGE=%DIR% Packages
if NOT !%DIR2%==! SET PACKAGE=%DIR2% Packages


SET DCPDIR=%ROOT%\Projects\Bpl

SET MAKE=%ROOT%\bin\make.exe
if EXIST %MAKE% goto hasmake
  SET MAKE=make
  SET ROOT=
  SET DCPDIR=
:hasmake

cd ..\devtools
if NOT EXIST bin\MakeDOF.exe  %MAKE% -s MakeDOF.exe
if NOT EXIST bin\MakeCFG.exe  %MAKE% -s MakeCFG.exe
if NOT EXIST bin\Bpg2Make.exe %MAKE% -s Bpg2Make.exe
cd bin

REM echo.
REM echo Creating .dof files
REM call makedofs.bat

echo.
echo Creating .cfg files
MakeCFG "..\..\packages\%DIR%\*.dpk" %DIR%packscfg.tmpl
if NOT !%DIR2%==! MakeCFG "..\..\packages\%DIR2%\*.dpk" %DIR%packscfg.tmpl

echo.
cd ..\..\packages

..\devtools\bin\Bpg2Make.exe "%PACKAGE%.bpg"

REM
REM This will go wrong if %MAKE% is something like:
REM   "C:\Program Files\Borland\Delphi7"\bin\make.exe
REM
REM It will work if %MAKE% is something like:
REM   C:\PROGRA~1\Borland\Delphi7\bin\make.exe
REM   "C:\Program Files\Borland\Delphi7\bin\make.exe"

%MAKE% -f "%PACKAGE%.mak" %4 %5 %6 %7 %8 %9 %TARGETS%

IF ERRORLEVEL 1 GOTO error
echo.
echo Cleaning

del /f "%PACKAGE%.mak"
del /f /q %DIR%\*.cfg
if NOT !%DIR2%==! del /f /q %DIR2%\*.cfg

echo.
echo The JVCL was successfuly built for %1
echo.
goto end

:error
echo.
echo !!!!! ERROR WHILE BUILDING THE JVCL !!!!
echo Please refer to last output for details
echo.
goto end

:help
echo MakeDelphi.bat - Builds the JVCL for Delphi
echo.
echo Usage:    MakeDelphi PackageName [DelphiDirectory] [PackageName2]
echo.
echo     PackageName       The name of the group file to use without "Packages"
echo                       e.g. "d6"
echo     DelphiDirectory   The place where Delphi is installed.
echo                       e.g. "C:\Program Files\Delphi6" (or %%DELDIR%%)
echo     PackageName2      The directory where the personal packages for the
echo                       given group are. e.g. "d6per"
echo.
echo Any additional argument (up to the 9th) will be passed to make
echo The TARGETS environment variable should contain the name of the 
echo packages to be built separated by spaces:
echo SET TARGETS=JvCoreC6R.bpl JvCoreC6D.bpl
echo If not specified, all packages will be built.
echo.
echo Delphi must be closed before running this batch file
echo.
:end

SET ROOT=
SET DIR=
SET DIR2=
SET PACKAGE=
SET DCPDIR=

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -