Клуб программистов

    Директива компилятора Define задает символ. После этого символ становится определен.

Когда символ определен, $IfDef компилирует условный код, а $IfNDef - нет.
Когда символ не определен, $IfNDef компилирует условный код, а $IfDef - нет.

     Delphi предоставляет несколько предопределенных символов, таких как Console, которые определены для консольных приложений и не определены для графических.

     $Define очень полезна в разрабатываемом коде, позволяя компилироваться различным секциям кода при тестировании.

var
   text : string;

begin
   // Set our code into test mode
   {$Define TESTMODE}

   text := 'We are in test mode';

   // Display the value of text if we are in test mode
   {$IfDef TESTMODE}
   ShowMessage('text = '+text);
   {$EndIf}

   // Switch off test mode
   {$UnDef TESTMODE}

   text := 'We are out of test mode';

   // Display the value of text if we are in test mode
   {$IfDef TESTMODE}
   ShowMessage('text = '+text);
   {$EndIf}
end;

We are in test mode