Облака / Clouds
    Go to Copy.com
    Copy.com
    The bast cloud service
    Get 20 GB free!!!
    Support WebDav.
    Show more >>

    Go to Dropbox.com
    Dropbox.com
    time-tested cloud storage
    Support WebDav.
Все бесплатно
    Все ссылки на файлы, расположенные на страницах сайта, добавлены пользователями и доступны для бесплатного скачивания. За содержание этих файлов администрация сайта ответственности не несет.



Вопросы
  Определение размера каталога
   Категория: Файловая система
  BDE. Расположение БД по псевдониму
   Категория: Базы данных
  Быстрое копирование файлов
   Категория: Файловая система
  Упаковка таблиц в BDE
   Категория: Базы данных
  Получение списка всех сетевых дисков из Delphi
   Категория: Интернет и Сети
  Создать *.mdb-файл и таблицу в ней
   Категория: Базы данных
  Создать индекс для таблицы ABS (Absolute Database)
   Категория: Базы данных
  Получить версию программы VersionInfo
   Категория: Приложение
  Число четное или нечетное
   Категория: Математика

Delphi - Справочник: Null

ABCDEFGHIJKLMNOPQRSTUVWXYZ

  << Вернуться  

 Null
var Null : Variant;
Переменная (Unit Variants)
Переменная, которая не имеет никакого значения
Описание:
Переменная Null имеет неопределенное значение.

Пустой указатель не означает нулевое число или пустую строку - оно неопределенное. Любое выражение, использующее пустую переменную, приведет к пустому результату.

Null особенно полезен при обработке SQL табличных данных - обеспечивая соответствие одного для другого с SQL NULL значением.
Пример кода: Использование Null для представления результата неудачного деления

var Answer : Variant; begin Answer := Divide(4,2); // Показ результата этого деления if Answer = Null then ShowMessage('4 / 2 = Invalid') else ShowMessage('4 / 2 = '+IntToStr(Answer)); Answer := Divide(4,0); // Показ результата этого деления if Answer = Null then ShowMessage('4 / 0 = Invalid') else ShowMessage('4 / 0 = '+IntToStr(Answer)); end; function TForm1.Divide(Dividend, Divisor: Integer) : Variant; begin // Попытка деления Dividend на Divisor try Result := Dividend div Divisor; except Result := Null ; // Присвоение Null, если деление выдало ошибку end; end;

Результат:
4 / 2 = 2
4 / 0 = Invalid
Примечание:
Переменная Null это Null Variant.

Вычисления с использованием пустых указателей приводят к EVariantError.

  << Вернуться