Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2013.03.22;
Скачать: CL | DM;

Вниз

Как скомпилировать DCU из PAS файла   Найти похожие ветки 

 
Виктор1985   (2012-06-08 19:15) [0]

Здравствуйте.

Подскажите, как правильно получить DCU из PAS файла с помощью DCC32.

Самый простой вариант

dcc32 myunit.pas

выдает ошибку на строке

{$IF compilerversion >= 19}

При этом в начало юнита вставил

{$IF not Declared(CompilerVersion)}
 тут вывожу варнинг
{$ENDIF}

варнинг выводится. При компиляции dpr файла с подключенным юнитом все ок, а сам юнит никак не компилируется. Использую D2010.


 
Rouse_ ©   (2012-06-08 20:11) [1]

пути тоже передавать нужно, с которыми обычный экзешник компилится. Сами пути можно в билдлоге посмотреть...


 
Виктор1985   (2012-06-09 12:10) [2]

Пуии все передаются, полный вариант батника

@echo off

echo ===== Compile "%~1" ======

SET DCUDIR=..\DCU

SET GLOBALUNITSEARCH=d:\Work\StarTeam\_Shared\Alternative_RTL_VCL\DCU\;"d:\Langs\RAD  Studio\7.0\lib";"d:\Langs\RAD Studio\7.0\Imports";"d:\Langs\RAD Studio\7.0\Lib\Indy10";"C:\Users\Public\Documents\RAD Studio\7.0\Dcp";"d:\Langs\RAD Studio\7.0\include";"d:\Langs\RAD Studio\7.0\RaveReports\Lib";"d:\Langs\Components\Virtual Treeview\Source";"d:\Langs\Components\madCollection\madBasic\BDS7";"d:\Langs\Com ponents\madCollection\madDisAsm\BDS7";"d:\Langs\Components\madCollection\madExce pt\BDS7";"d:\Langs\Components\madCollection\madExcept\..\Plugins";"d:\Langs\Comp onents\madCollection\madKernel\BDS7";"d:\Langs\Components\madCollection\madSecur ity\BDS7";"d:\Langs\Components\madCollection\madShell\BDS7";d:\work\starteam\_sh ared\packages\source\f-in-box\packages;d:\Work\StarTeam\_Shared\Packages\DCU;

SET LOCALFILES="GUI;sbHardware;sbHardware\TGetDiskSerialVCL;sbUtils;sbUtils\sbLocali zer;sbUtils\PBearHTMLViewer;sbUtils\PBearHTMLViewer\Obj"

SET FINDPASDIR=%GLOBALUNITSEARCH%;%LOCALFILES%;..\..\_Shared\SharedUnits\;..\..\_Shared\SharedUnits\Protect;..\..\_Shared\Shar edUnits\Utils;

SET DEFINE=RELEASE;

dcc32 -D%DEFINE% -U%FINDPASDIR% -N0%DCUDIR% "%~1"

IF ERRORLEVEL 1 GOTO ERROR

rem -------------Все завершили теперь можно выходить

GOTO EXIT
:ERROR
echo ===========!!!!!!!!!!!!!!!!Error!!!!!!!!!!!============
pause
:EXIT



Страницы: 1 вся ветка

Текущий архив: 2013.03.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.064 c
2-1333196241
SKIPtr
2012-03-31 16:17
2013.03.22
управление входящим подключением


15-1353184202
Юрий
2012-11-18 00:30
2013.03.22
С днем рождения ! 18 ноября 2012 воскресенье


15-1342778707
Юрий Зотов
2012-07-20 14:05
2013.03.22
Наш ответ


2-1347886681
fredwriter
2012-09-17 16:58
2013.03.22
AlphaBlend: наложить bmp на jpg или наоборот


15-1345752441
Дмитрий С
2012-08-24 00:07
2013.03.22
Фотографы извращенцы