Директива $EndIf компілятора Delphi закінчує умовну компіляцію коду.
{$IfDef Symbol}
... Код для запуску, коли визначено символ ...
{$Else}
... Код для запуску, коли символ не визначено ...
{$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.
