Icebird

Delphi/C# - My favorite programming language

My Links

Blog Stats

DevExpress ExpressScheduler 快速编译批处理文件

手动安装DevExpress的控件包源代码实在是让人受不了,写了一个批处理快速的生成bpl, dcp,以及dcu

首先将ExpressScheduler 的源代码解压到一个目录。
将下面的代码保存为Build.bat (不能改成其它文件名),然后执行,等待,在Lib中就是所有的编译后的文件。

@echo off
if not exist Lib md Lib
set LIB=.\Lib

if not %1== N goto copy
call Build "ExpressGDI+ Library"
call Build "XP Theme Manager"
call Build "ExpressDataController"
call Build "ExpressEditors Library 5"
call Build "ExpressExport Library"
call Build "ExpressLibrary"
call Build "ExpressScheduler 2"

cd %LIB%
set Param=-$D- -B
dcc32 dxGDIPlusD7
.dpk %Param%
dcc32 dxThemeD7
.dpk %Param%
dcc32 cxDataD7
.dpk %Param%
dcc32 cxADOAdaptersD7
.dpk %Param%
dcc32 cxBDEAdaptersD7
.dpk %Param%
dcc32 cxIBXAdaptersD7
.dpk %Param%
dcc32 cxEditorsVCLD7
.dpk %Param%
dcc32 cxExtEditorsVCLD7
.dpk %Param%
dcc32 dclcxEditorsVCLD7
.dpk %Param%
dcc32 dclcxExtEditorsVCLD7
.dpk %Param%
dcc32 cxExportVCLD7
.dpk %Param%
dcc32 cxLibraryVCLD7
.dpk %Param%
dcc32 dclcxLibraryVCLD7
.dpk %Param%
dcc32 dclcxSchedulerVCLD7
.dpk %Param%
dcc32 cxSchedulerVCLD7
.dpk %Param%


del *.pas
del *.dpk
::del *.res
::
del *.dfm
del *.bpk
del *.bmp
del *.dcr
del *.cpp
del *.inc
pause
goto exit

:copy
if not exist %1 goto exit
cd %1
if exist Packages copy "Packages\*.*" .%LIB% /> nul
if exist Sources copy "Sources\*.*" .%LIB% /> nul
cd..

:exit



DevExpress的其余控件包,在这个上面只需要稍作修改即可适用。

posted on 2008-01-03 12:04  Icebird  阅读(...)  评论(...编辑  收藏