| Описание |
Директива компилятора $Define определяет Symbol. Таким образом делая символ включённым (On).
Когда символ включён (On), $IfDef компилирует условный код, а $IfNDef нет.
Когда символ выключен (Off), $IfNDef компилирует условный код, и $IfDef нет.
Delphi обеспечивает некоторые предопределенные символы, типа Console, который включен (On) для консольлного приложения и выключен (Off) GUI приложения (с графическим интерфейсом пользователя).
$Define очень полезен при разработке кода, позволения при испытании быть откомпилированным различным разделам.
|
|
| Похожие команды |
$Else Начинает дополнительный раздел IfDef или IfNDef
$IfDef Выполняет код, если условный символ был определен
$IfNDef Выполняет код, если условный символ не был определен
$IfOpt Проверяет состояние директивы компилятора
$IfOpt Проверяет состояние директивы компилятора
$UnDef Выключает символ директивы компилятора - используемый IfDef
| |
|
| Пример кода : Установка и использование символа испытательного режима |
var
text : string;
begin
// Установка нашего кода в
испытательный режим
{$Define TESTMODE}
text := 'Мы испытательном режиме';
// Показ значения текста, если мы в
испытательном режиме
{$IfDef TESTMODE}
ShowMessage('text = '+text);
{$EndIf}
// Выключение испытательного режима
{$UnDef TESTMODE}
text := 'Мы вне испытательного режима';
// Показ значения текста, если мы в
испытательном режиме
{$IfDef TESTMODE}
ShowMessage('text = '+text);
{$EndIf}
end;
|
Мы испытательном режиме
|
|
