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

Вниз

Как можно задать константу автоматически при выборе приложения?   Найти похожие ветки 

 
dreamse   (2008-07-04 09:34) [0]

Доброе утро.

В глобальном юните для всех проектов есть константа

const
 ProjectNumber = 0;

И есть несколько проектов. Каждый из которых имеет свой номер.
В зависимости от этого номера формируеться название DLL при её инциализации.
т.е задать переменную после старте проекта уже не удасться.

Вопрос: Можно ли в Delphi каким либо образом менять в коде это глобальную константу при компиляции проекта?

p.s конечно со временем будет создана утилита для автоматической компиляции всех проектов и автоматического изменения константы, но пока для тестирования и отладки проектов нужна возможность автоматического изменения чтобы не править руками, проектов много и постоянно менять цифру проблематично, можно и забыть.


 
Поросенок Винни-Пух ©   (2008-07-04 09:39) [1]

const
{$IFDEF PROGECT0}
ProjectNumber = 0;
{$ENDIF}
{$IFDEF PROGECT1}
ProjectNumber = 1;
{$ENDIF}


 
dreamse   (2008-07-04 10:18) [2]

> Поросенок Винни-Пух ©   (04.07.08 09:39) [1]

Вписываю: {$IFDEF PROGECT0}

заместо PROGECT0 имя проекта, реакции ноль :(

Как в $IFDEF задавать определение чего то ? Например проекта ?


 
Поросенок Винни-Пух ©   (2008-07-04 10:23) [3]

Ууууу как все запущено ..........


 
Поросенок Винни-Пух ©   (2008-07-04 10:24) [4]

project->options directories/conditionals


 
dreamse   (2008-07-04 10:33) [5]

> Поросенок Винни-Пух ©   (04.07.08 10:24) [4]

Спасибо, разобрался


 
Anatoly Podgoretsky ©   (2008-07-04 11:09) [6]

> dreamse  (04.07.2008 10:18:02)  [2]

Нормальные люди справку читают, не призирая и часть See Also

{$DEFINE



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

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

Наверх




Память: 0.48 MB
Время: 0.012 c
2-1247119359
Алексей85
2009-07-09 10:02
2009.09.13
Перенос приложения


15-1247455425
vajo
2009-07-13 07:23
2009.09.13
Что может означать длинный писк материнки?


2-1247479333
lamerz
2009-07-13 14:02
2009.09.13
многопоточность для TCP IP


15-1247320167
TIF
2009-07-11 17:49
2009.09.13
Windows 98


1-1214477815
yaric
2008-06-26 14:56
2009.09.13
выгрузка chartobject-а в html