delphi 命令行编译

1、delphi.dpr

program Project1;
{$APPTYPE CONSOLE}
uses
SysUtils;
begin
Writeln('Hello Word!');
Readln;
end.

2、run.bat

@echo off
for /f "tokens=4" %%i in ('reg query HKCU/Software/Borland/Delphi/7.0/Library /v "Search Path"') do set SearchPath=%%i
dcc32.exe -B "e:/delphi.dpr" -U%SearchPath%
pause

记得要指定库文件路径，否则会出现  F1027 Unit not found: 'System.pas' or binary equivalents (.dcu) 异常

也可以手动敲命令：

dcc32.exe  -b delphi.dpr -U"librartPath"

例子参考请下载：http://download.csdn.net/detail/earbao/5887819

另外可以编译熊猫烧香病毒delphi源码哦。