{$IfDef Symbol} ... Код выполняемый если Symbol определён ... {$Else} ... Код выполняемый если Symbol не определён ... {$EndIf}
Описание
Директива компилятора $IfDef начинает раздел условно компилируемой программы.
Символы бывают двух типов. Предопределенные в Delphi - такие как Console, при выполнении консольного приложения. И определенные директивой компилятора $Define.
$IfDef очень полезна при разработке кода, позволяя при тестировании компилироваться различным разделам.
Похожие команды
$Define Определяет символ директивы компилятора, который используется IfDef
$Else Начинает дополнительный раздел IfDef или IfNDef
$UnDef Выключает символ директивы компилятора - используемый IfDef
Пример кода : Установка и использование символа режима тестирования
var
text : string;
begin // Устанавливаем наш код в режим тестирования
{$Define TESTMODE}
text := 'Мы в режиме тестирования'; // Показ значения текста, если мы находимся в режиме тестирования
{$IfDef TESTMODE}
ShowMessage(text);
{$EndIf} // Выключение режима тестирования
{$UnDef TESTMODE} // Показ значения текста, если мы находимся в режиме тестирования
{$IfDef TESTMODE}
ShowMessage(text);
{$Else}
ShowMessage('Сейчас выходим из режима тестирования');
{$EndIf}
end;
Мы в режиме тестирования
Сейчас выходим из режима тестирования