Директива $EndIf компилятора Delphi заканчивает условную компиляцию кода.
{$IfDef Symbol}
... Code to run when the symbol is defined ...
{$Else}
... Code to run when the symbol is not defined ...
{$EndIf}
Директива компилятора $EndIf заканчивает раздел условно компилируемой программы.
См. $IfDef и $IfNDef.
Директива компилятора $EndIf: Установка и использование символа определяемого пользователем
var
text : string;
begin
// Установка нашего кода в испытательный режим
{$Define TESTMODE}
text := 'Мы в испытательном режиме';
// Отображение значения текста, если мы находимся в испытательном режиме
{$IfDef TESTMODE}
ShowMessage('text = '+text);
{$EndIf}
// Выключение испытательного режима
{$UnDef TESTMODE}
// Отображение значения текста, если мы находимся в испытательном режиме
{$IfDef TESTMODE}
ShowMessage('text = '+text);
{$Else}
ShowMessage('Вне испытательного режима');
{$EndIf}
end;
Результат
Мы в испытательном режиме
Вне испытательного режима
Похожие функции, процедуры и команды
$Define — определяет символ директивы компилятора, который используется IfDef.
$Else — начинает дополнительный раздел IfDef или IfNDef.
$IfDef — выполняет код, если условный символ был определен.
$IfNDef — выполняет код, если условный символ не был определен.
$IfOpt — проверяет состояние директивы компилятора.
$UnDef — выключает символ директивы компилятора - используемый IfDef.
