Delphi Variant 判断是否为空

VarIsEmpty 和 VarIsNull 在 Delphi 中都是用于判断 Variant 类型变量的函数，但它们之间有着明显的区别：

VarIsEmpty

VarIsEmpty 函数用于判断一个 Variant 变量是否未被初始化或显式地被设置为空状态。当一个 Variant 变量被声明后尚未被赋予任何值，或者通过某种方式被设置为表示空状态的值时，VarIsEmpty 会返回 True。然而，需要注意的是，Variant 类型的“空状态”并不等同于 null 值；它是一个特殊的状态，表示变量尚未包含有效的数据。

VarIsNull

VarIsNull 函数则用于判断一个 Variant 变量是否显式地包含 null 值。在 Delphi 中，null 是一个特殊的值，用于表示数据缺失或不可用。当一个 Variant 变量被明确地赋值为 null（通常通过 Null 常量）时，VarIsNull 会返回 True。这与 VarIsEmpty 不同，因为 VarIsEmpty 关心的是变量是否处于未初始化或空状态，而不是它是否包含 null 值。

区别总结

• 目的不同：VarIsEmpty 用于判断 Variant 是否为空（未初始化或显式设置为空状态），而 VarIsNull 用于判断 Variant 是否包含 null 值。
• 含义不同：空状态（由 VarIsEmpty 判断）表示变量尚未包含有效数据，而 null 值（由 VarIsNull 判断）表示数据缺失或不可用。
• 应用场景：在处理 Variant 类型的数据时，根据实际需求选择合适的函数来判断变量的状态。

示例代码

var
  v1, v2: Variant;
begin
  v1 := Unassigned; // 未初始化，VarIsEmpty 返回 True
  v2 := Null; // 显式设置为 null，VarIsNull 返回 True

  if VarIsEmpty(v1) then
    ShowMessage('v1 is empty')
  else
    ShowMessage('v1 is not empty');

  if VarIsNull(v2) then
    ShowMessage('v2 is null')
  else
    ShowMessage('v2 is not null');
end;

在这个例子中，v1 被声明后未初始化，因此 VarIsEmpty(v1) 返回 True；而 v2 被显式地设置为 Null，所以 VarIsNull(v2) 返回 True。

也可直接与null 比较，因为 null 是一个函数，不可以与nil进行比较 会报错；

    if node.Values[5] = null then
    begin
       ShowMessage('pnull');
    end else begin
      parentId := node.Values[5];
      ShowMessage('parentId' + parentId.ToString);
    end;