buildd4.bat

一个很好用的控件

@echo Start BuildD4

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

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

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

SET savepath=%path% >> %1

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

@echo Building ABC40.DPK

dcc32 ABC40.dpk >> %1

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

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

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

copy ..\..\Delphi4\ABC40.BPL C:\WinNT\System32 >> %1
copy ..\..\Delphi4\ABCDB40.BPL C:\WinNT\System32 >> %1
copy ..\..\Delphi4\ABCDBD40.BPL C:\WinNT\System32 >> %1
copy ..\..\Delphi4\ABCDCL40.BPL C:\WinNT\System32 >> %1

REM copy ..\..\Delphi4\ABC40.BPL C:\Windows\System >> %1
REM copy ..\..\Delphi4\ABCDB40.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 dclABCbd.DPK
dcc32 dclABCbd.dpk >> %1
@echo Building dclABCcl.DPK
dcc32 dclABCcl.dpk >> %1

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

SET path=%savepath% >> %1

@echo BuildD4 Complete
@echo -------- D4 Completed --------------- >> %1