Главная страница
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.01 c
15-1247292314
Kerk
2009-07-11 10:05
2009.09.13
Обожаю, когда заказчик точно знает, чето хочет :)


9-1181661095
MERLIN:)
2007-06-12 19:11
2009.09.13
Нужно сделать анимацию


1-1214285651
dreamse
2008-06-24 09:34
2009.09.13
Передача данных между приложениями


15-1246903377
TUser
2009-07-06 22:02
2009.09.13
"Экономия" на Линуксе


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