var
  num1, num2 : Word;

begin
  num1   := $2C;    // Бинарное значение : 0000 0000 0010 1100
                    // Значение после применения Not : 1111 1111 1101 0011 = $FFD3

  // Использование для возврата Булевого значения
  if Not (num1 > 0)
  then ShowMessage('num1 <= 0')
  else ShowMessage('num1 > 0');

  // Использование при выполнении математической операции NOT
  num2 := Not num1;

  // Отображение результата
  ShowMessage('Not $2C = $'+IntToHex(num2,2));
end;