buildd5.bat

来自「一个很好用的控件」· Batch 代码 · 共 92 行

BAT
92
字号

@echo Start BuildD5

del ..\..\delphi5\*.dcu >> %1
del ..\..\delphi5\*.dcp >> %1
del ..\..\delphi5\*.bpl >> %1

REM copy ..\*.inc ..\..\delphi5 >> %1
REM copy ..\*.dfm ..\..\delphi5 >> %1
REM copy ..\*.res ..\..\delphi5 >> %1

copy dcc32.cfg "c:\Program Files\Borland\Delphi5\Bin" >> %1

SET savepath=%path% >> %1

SET path="c:\Program Files\Borland\Delphi5\Bin";%path% >> %1

@echo Building ABC50.DPK
dcc32 ABC50.dpk >> %1

@echo Building ABCDB50.DPK
dcc32 ABCDB50.dpk >> %1

@echo Building ABCDAD50.DPK
dcc32 ABCDAD50.dpk >> %1

@echo Building ABCDBD50.DPK
dcc32 ABCDBD50.dpk >> %1

@echo Building ABCDCL50.DPK
dcc32 ABCDCL50.dpk >> %1

@echo Building ABCDIB50.DPK
dcc32 ABCDIB50.dpk >> %1

copy ..\..\Delphi5\ABC50.BPL C:\WinNT\System32 >> %1
copy ..\..\Delphi5\ABCDB50.BPL C:\WinNT\System32 >> %1
copy ..\..\Delphi5\ABCDAD50.BPL C:\WinNT\System32 >> %1
copy ..\..\Delphi5\ABCDBD50.BPL C:\WinNT\System32 >> %1
copy ..\..\Delphi5\ABCDCL50.BPL C:\WinNT\System32 >> %1
copy ..\..\Delphi5\ABCDIB50.BPL C:\WinNT\System32 >> %1

REM copy ..\..\Delphi5\ABC50.BPL C:\Windows\System >> %1
REM copy ..\..\Delphi5\ABCDB50.BPL C:\Windows\System >> %1
REM copy ..\..\Delphi5\ABCDAD50.BPL C:\Windows\System >> %1
REM copy ..\..\Delphi5\ABCDBD50.BPL C:\Windows\System >> %1
REM copy ..\..\Delphi5\ABCDCL50.BPL C:\Windows\System >> %1
REM copy ..\..\Delphi5\ABCDIB50.BPL C:\Windows\System >> %1

@echo Building dclABCxx.DPK
dcc32 dclABCxx.dpk >> %1
@echo Building dclABC_a.DPK
dcc32 dclABC_a.dpk >> %1
@echo Building dclABC_b.DPK
dcc32 dclABC_b.dpk >> %1
@echo Building dclABC_c.DPK
dcc32 dclABC_c.dpk >> %1
@echo Building dclABC_d.DPK
dcc32 dclABC_d.dpk >> %1
@echo Building dclABC_e.DPK
dcc32 dclABC_e.dpk >> %1
@echo Building dclABC_f.DPK
dcc32 dclABC_f.dpk >> %1
@echo Building dclABC_g.DPK
dcc32 dclABC_g.dpk >> %1
@echo Building dclABC_h.DPK
dcc32 dclABC_h.dpk >> %1
@echo Building dclABC_i.DPK
dcc32 dclABC_i.dpk >> %1
@echo Building dclABC_j.DPK
dcc32 dclABC_j.dpk >> %1
@echo Building dclABC_k.DPK
dcc32 dclABC_k.dpk >> %1
@echo Building dclABC_l.DPK
dcc32 dclABC_l.dpk >> %1
@echo Building dclABC_m.DPK
dcc32 dclABC_m.dpk >> %1
@echo Building dclABCad.DPK
dcc32 dclABCad.dpk >> %1
@echo Building dclABCbd.DPK
dcc32 dclABCbd.dpk >> %1
@echo Building dclABCcl.DPK
dcc32 dclABCcl.dpk >> %1
@echo Building dclABCib.DPK
dcc32 dclABCib.dpk >> %1

del "c:\Program Files\Borland\Delphi5\Bin"\dcc32.cfg >> %1

SET path=%savepath% >> %1

@echo BuildD5 Complete
@echo -------- D5 Completed --------------- >> %1

⌨️ 快捷键说明

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