Главная страница
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.011 c
1-1212847400
Alik
2008-06-07 18:03
2009.09.13
Свойства Pen.Style при прорисовке контура методом Polyline


8-1196969315
uitl
2007-12-06 22:28
2009.09.13
bmp


15-1247728694
desc
2009-07-16 11:18
2009.09.13
PostgreSQL, доступ из одной БД в другую, построение views...


15-1248035401
Юрий
2009-07-20 00:30
2009.09.13
С днем рождения ! 19 июля 2009 воскресенье


2-1247062851
mr1Andersen
2009-07-08 18:20
2009.09.13
Как программно (Delphi 7), изменить значения «Свойства папки», на