Директива $IfOpt компилятора Delphi проверяет состояние директивы компилятора.
Вариант 1.
{$IfOpt Switch-}
...
{$Else}
...
{$EndIf}
Вариант 2.
{$IfOpt Switch+}
...
{$Else}
...
{$EndIf}
Директива компилятора $IfOpt является мета директивой, она проверяет на +(вкл) или -(выкл) состояние отдельной символьной директивы компилятора.
Например:
{$IfOpt H+}
ShowMessage('Longstrings are set on');
{$EndIf}
Это полезно для отчёта по установке директив при запуске программы, когда проводится тестирование.
Примечания.
$IfOpt может использоваться в вашем коде множество раз.
Директива компилятора $IfOpt: Показ различных заданных по умолчанию настроек директив
begin
// Показ различных заданных по умолчанию настроек директив
{$IfOpt A+}
ShowMessage('Align - On');
{$Else}
ShowMessage('Align - Off');
{$EndIf}
{$IfOpt B+}
ShowMessage('BoolEval - On');
{$Else}
ShowMessage('BoolEval - Off');
{$EndIf}
{$IfOpt H+}
ShowMessage('LongStrings - On');
{$Else}
ShowMessage('LongStrings - Off');
{$EndIf}
end;
Результат
Align - Off
BoolEval - Off
LongStrings - On
Похожие функции, процедуры и команды
$Define — определяет символ директивы компилятора, который используется IfDef.
$Else — начинает дополнительный раздел IfDef или IfNDef.
$EndIf — заканчивает условную компиляцию кода.
$IfDef — выполняет код, если условный символ был определен.
$IfNDef — выполняет код, если условный символ не был определен.
$UnDef — выключает символ директивы компилятора - используемый IfDef.
