uses System.Variants;

var
  N1, N2: Variant;
  Exists1, Exists2: Boolean;
begin
  N1 := 42;
  Exists1 := not VarIsNull(N1);
  //exists1 is True

  N2 := Null;
  Exists2 := not VarIsNull(N2);
  //exists2 is False

  WriteLn('exists1 is ', Exists1);
  WriteLn('exists2 is ', Exists2);
end.