Delphi справочник - Форум программистов - Навигация  
 A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z      По первой букве  
System     SysUtils     StrUtils     DateUtils     FileCtrl     ConvUtils     StdConvs     Math     Classes     Dialogs     Types     Variants    ПО Unit   Compiler directives     Directives     Keywords     Types     Variables     Constants     Functions     Procedures    По категории  


Основы Delphi
$IfOpt
Деректива компилятора
Проверяет состояние директивы компилятора unit
  
1 {$IfOpt Switch-}
...
{$Else}
...
{$EndIf}
2 {$IfOpt Switch+}
...
{$Else}
...
{$EndIf}
Описание
Директива компилятора $IfOpt является мета директивой, она проверяет на +(вкл) или -(выкл) состояние отдельной символьной директивы компилятора.
Например:

{$IfOpt H+}
ShowMessage('Longstrings are set on');
{$EndIf}

Это полезно для отчёта по установке директив при запуске программы, когда проводится тестирование.
Примечания
$IfOpt может использоваться в вашем коде множество раз.
Похожие команды
$Define  Определяет символ директивы компилятора, который используется IfDef

$Else  Начинает дополнительный раздел IfDef или IfNDef

$EndIf  Заканчивает условную компиляцию кода

$IfDef  Выполняет код, если условный символ был определен

$IfNDef  Выполняет код, если условный символ не был определен

$UnDef  Выключает символ директивы компилятора - используемый IfDef

 
Пример кода : Показ различных заданных по умолчанию настроек директив
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
 



© Форум Delphi   |  Блог программистов   |  Создание и продвижение сайтов - "Веб сателлит"  |  Ссылки   |  Английская версия