利用DCC32实现命令行批量编译

*.dof

[Compiler]

A=1

B=0

C=1

D=1

E=0

F=0

G=1

H=1

I=1

J=1

K=0

L=1

M=0

N=1

O=1

P=1

Q=0

R=0

S=0

T=0

U=0

V=1

W=0

X=1

Y=1

Z=1

ShowHints=1

ShowWarnings=1

UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;

 

[Linker]

MapFile=0

OutputObjs=0

ConsoleApp=1

DebugInfo=0

RemoteSymbols=0

MinStackSize=16384

MaxStackSize=1048576

ImageBase=4194304

ExeDescription=

 

[Directories]

OutputDir=

UnitOutputDir=c:\dcu

PackageDLLOutputDir=

PackageDCPOutputDir=

SearchPath=
Packages=Vcl50;Vclx50;Vcldb50;vclado50;ibevnt50;Vclbde50;vcldbx50;TeeUI50;TeeDB50;Tee50;TeeQR50;……
Conditionals=

DebugSourceDirs=

UsePackages=1

 

[Parameters]

RunParams=

HostApplication=D:\conductor60\c_dsbin\LeaderWorkCenter.exe

 

[Language]

ActiveLang=

ProjectLang=$00000804

RootDir=

 

[Version Info]

IncludeVerInfo=1

AutoIncBuild=1

MajorVer=2

MinorVer=2

Release=2

Build=2

Debug=0

PreRelease=0

Special=0

Private=0

DLL=1

Locale=2052

CodePage=936

 

[Version Info Keys]

CompanyName=公司

FileDescription=系统程序

FileVersion=2.2.2.2

InternalName=

LegalCopyright=(C)2002

LegalTrademarks=中国(中文简体)

OriginalFilename=

ProductName=系统

ProductVersion=6.0

 

[Excluded Packages]

$(DELPHI)\Bin\dcldss50.bpl=Borland Decision Cube Components

 

[HistoryLists\hlUnitAliases]

Count=1

Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;

 

[HistoryLists\hlUnitOutputDirectory]

Count=1

Item0=c:\dcu

 

[HistoryLists\hlOutputDirectorry]

Count=5

Item0=d:\Conductor60\c_modi

Item1=d:\gConductor60\c_modi

Item2=d:\gConductor60\c_pkg

Item3=\\10.4.1.12\GConductor60\c_Pkg

Item4=d:\gConductor50\c_modi

 

*.Cfg

-B

-Q

Y-

-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;

-E"C:\Documents and Settings\chengjiea\桌面\新建文件夹"

-LN"C:\Documents and Settings\chengjiea\桌面\新建文件夹"

-LE"C:\Documents and Settings\chengjiea\桌面\新建文件夹"

-N"c:\dcu"

-U"C:\Documents and Settings\chengjiea\桌面\新建文;O:\CLASS\SOURCE;O:\LIB\SOURCE;O:\VCL\SOURCE;O:\VCL\SOURCE\quickrpt;O:\VCL\SOURCE\DesignVR5;O:\VCL\SOURCE\ip2000-O"C:\Documents and Settings\chengjiea\桌面\新建文件;O:\CLASS\SOURCE;O:\LIB\SOURCE;O:\VCL\SOURCE;O:\VCL\SOURCE\quickrpt;O:\VCL\SOURCE\DesignVR5;O:\VCL\SOURCE\ip2000

-R"C:\Documents and Settings\chengjiea\桌面\新建文件;O:\CLASS\SOURCE;O:\LIB\SOURCE;O:\VCL\SOURCE;O:\VCL\SOURCE\quickrpt;O:\VCL\SOURCE\DesignVR5;O:\VCL\SOURCE\ip2000

-I"C:\Documents and Settings\chengjiea\桌面\新建文件;O:\CLASS\SOURCE;O:\LIB\SOURCE;O:\VCL\SOURCE;O:\VCL\SOURCE\quickrpt;O:\VCL\SOURCE\DesignVR5;O:\VCL\SOURCE\ip2000

-LUVcl50;Vclx50;VclSmp50;Vcldb50;vclado50;ibevnt50;…… 

 

 

 

*.bat

@echo off

Echo 正在编译,请稍等......

 

Echo. > "C:\Documents and Settings\chengjiea\桌面\CompileHouseLog.Txt"

Echo. 2008-9-27 8:41:46 >> "C:\Documents and Settings\chengjiea\桌面\CompileHouseLog.Txt"

Echo. ===========PalMr51C ===========>> "C:\Documents and Settings\chengjiea\桌面\CompileHouseLog.Txt"

 

Echo 删除C:\Program Files\Borland\Delphi5\Bin\DCC32.Cfg

Echo. "Del C:\Program Files\Borland\Delphi5\Bin\DCC32.Cfg" >> "C:\Documents and Settings\chengjiea\桌面\CompileHouseLog.Txt"

Del "C:\Program Files\Borland\Delphi5\Bin\DCC32.Cfg"

 

Echo 创建C:\Program Files\Borland\Delphi5\Bin\DCC32.Cfg

Echo. "Copy D:\本地工作\北方区\SX-沈信\SOURCE70\PALMR59\PalMr59C.Cfg to DCC32.Cfg" >> "C:\Documents and Settings\chengjiea\桌面\CompileHouseLog.Txt"

Copy "D:\本地工作\北方区\SX-沈信\SOURCE70\PALMR59\PalMr59C.Cfg" "C:\Program Files\Borland\Delphi5\Bin\DCC32.Cfg"

 

Echo 切换目录至D:\本地工作\北方区\SX-沈信\SOURCE70\PALMR59\

Echo. "CD D:\本地工作\北方区\SX-沈信\SOURCE70\PALMR59\" >> "C:\Documents and Settings\chengjiea\桌面\CompileHouseLog.Txt"

CD/D "D:\本地工作\北方区\SX-沈信\SOURCE70\PALMR59\" >> "C:\Documents and Settings\chengjiea\桌面\CompileHouseLog.Txt"

 

Echo 编译

Echo. "编译" >> "C:\Documents and Settings\chengjiea\桌面\CompileHouseLog.Txt"

"C:\Program Files\Borland\Delphi5\Bin\DCC32.Exe"  "D:\本地工作\北方区\SX-沈信\SOURCE70\PALMR59\PalMr59C.dpr" >> "C:\Documents and Settings\chengjiea\桌面\CompileHouseLog.Txt"

Echo ……

 

echo 编译完成!

echo. & pause

 

posted @ 2008-09-27 12:28  威尼斯的夏天  阅读(914)  评论(0编辑  收藏  举报