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

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.005 c
2-1247344154
Артем
2009-07-12 00:29
2009.09.13
Ошибки при запросах


4-1216402140
guav
2008-07-18 21:29
2009.09.13
Панель управления->Языки->Дополнительно->Для не юникод


4-1217397687
VitGun
2008-07-30 10:01
2009.09.13
Получение данных из таблицы другой программы.


4-1215791230
Mielofon
2008-07-11 19:47
2009.09.13
Нужно содержимое большой панели вывести в EMF файл


1-1214753592
Real
2008-06-29 19:33
2009.09.13
Нормальный ListBox или Grid





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский