Delphi Variants

Delphi Variants-VarIsEmpty、VarIsNull 判断Variant变量是否为空、是否包含Null值

引用单元：Variants

函数：VarIsEmpty、VarIsNull

原型：

//VarIsNull 判断Variant变量是否包含一个Null值，例如数据库原始字段值Null

?

1 2 3 4

function VarIsNull(const V: Variant): Boolean; begin   Result := FindVarData(V)^.VType = varNull; end;

//VarIsEmpty  判断Variant 变量是否为空

?

1 2 3 4

function VarIsEmpty(const V: Variant): Boolean; begin   Result := FindVarData(V)^.VType = varEmpty; end;

　　

引用Variants 后，其实还有两个函数也是可以使用的：

?

1 2	function Unassigned: Variant; // 未赋值的标准常数 function Null: Variant;       // 空 标准常数