Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.12.2011, 20:22   #1
Warn
Форумчанин
 
Аватар для Warn
 
Регистрация: 03.11.2011
Сообщений: 230
Вопрос Препроцессор Delphi

Как можно определить препроцессорной оберткой delphi какой код следует компилить релизную или дебажную версию?

все нашел
Код:
{$IFDEF DEBUG}
	Writeln('gebug');
{$ELSE}
	Writeln('release');
{$ENDIF}

Последний раз редактировалось Warn; 19.12.2011 в 20:32.
Warn вне форума Ответить с цитированием
Старый 19.12.2011, 20:32   #2
haruhi
Форумчанин
 
Аватар для haruhi
 
Регистрация: 05.10.2011
Сообщений: 368
По умолчанию

Код:
var
   text : string;

 begin
  // Устанавливаем наш код в режим тестирования
   {$Define TESTMODE}

   text := 'Мы в режиме тестирования';

  // Показ значения текста, если мы находимся в режиме тестирования
   {$IfDef TESTMODE}
   ShowMessage(text);
   {$EndIf}

  // Выключение режима тестирования
   {$UnDef TESTMODE}

  // Показ значения текста, если мы находимся в режиме тестирования
   {$IfDef TESTMODE}
   ShowMessage(text);
   {$Else} 
   ShowMessage('Сейчас выходим из режима тестирования');
   {$EndIf}
 end;
за подробностями в гугль
Не стоит будить спящего Бога! (с) Меланхолия Харухи Судзумии
haruhi вне форума Ответить с цитированием
Старый 19.12.2011, 20:39   #3
GunSmoker
Старожил
 
Регистрация: 13.08.2009
Сообщений: 2,581
По умолчанию

Замечу, что символы условной компиляции можно определять не только через {$DEFINE XYZ}, но и указывать в опциях проекта (Project/Options/Directories-Conditionals/Defines).
Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.
GunSmoker вне форума Ответить с цитированием
Старый 19.12.2011, 20:46   #4
Пепел Феникса
Старожил
 
Аватар для Пепел Феникса
 
Регистрация: 28.01.2009
Сообщений: 21,000
По умолчанию

в XE, если выбрана конфигурация DEBUG то определен препроцессорный символ DEBUG.
Хорошо поставленный вопрос это уже половина ответа. | Каков вопрос, таков ответ.
Программа делает то что написал программист, а не то что он хотел.
Функции/утилиты ждут в параметрах то что им надо, а не то что вы хотите.
Пепел Феникса вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Не изменяется интерфейс моей программы при переходе с Delphi 7 на Delphi 2010 Elvisnya Общие вопросы Delphi 3 28.04.2011 15:59
Препроцессор: определение длины строки Пепел Феникса Общие вопросы C/C++ 11 10.02.2011 21:20
C++, препроцессор, как из "int" сделать "char"? Максай Помощь студентам 3 05.09.2008 08:16
Delphi. Как нарисовать в Delphi два движущиеся шара с определенной скоростью? redred Общие вопросы Delphi 10 11.12.2007 10:43
Как открыть БД, написанную в Delphi если нf другой машине Delphi нет? dagarik БД в Delphi 7 22.10.2007 17:54