Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2013.03.22;
Скачать: [xml.tar.bz2];

Вниз

Как скомпилировать 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.068 c
15-1341001802
Юрий
2012-06-30 00:30
2013.03.22
С днем рождения ! 30 июня 2012 суббота


15-1333057317
Германн
2012-03-30 01:41
2013.03.22
Взаимодействие 64-х битного приложения с 32-х битной библиотекой


2-1340013571
IGray
2012-06-18 13:59
2013.03.22
Как правильно закрыть модальную форму из OnActivate?


2-1330408314
AV
2012-02-28 09:51
2013.03.22
Владение критической секцией


9-1181473912
@!!ex_
2007-06-10 15:11
2013.03.22
Проблема со стенсилем.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский