Delphi-Help

Описание

var Null : Variant;

Переменная Null имеет неопределенное значение.

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

Null особенно полезен при обработке SQL табличных данных - обеспечивая соответствие одного для другого с SQL 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.