Главная страница
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.048 c
15-1345840202
Юрий
2012-08-25 00:30
2013.03.22
С днем рождения ! 25 августа 2012 суббота


2-1335212783
vegarulez
2012-04-24 00:26
2013.03.22
[named pipes] Как?


15-1340013994
Дмитрий С
2012-06-18 14:06
2013.03.22
Проверка орфографии.


15-1353950365
Разведка
2012-11-26 21:19
2013.03.22
Проблема принтера для чеков VKP-80-II


15-1348607335
MastaK
2012-09-26 01:08
2013.03.22
Передачи про животных