Delphi Variants-VarIsEmpty、VarIsNull 判断Variant变量是否为空、是否包含Null值
引用单元:Variants
函数:VarIsEmpty、VarIsNull
原型:
//VarIsNull 判断Variant变量是否包含一个Null值,例如数据库原始字段值Null
function VarIsNull(const V: Variant): Boolean; begin Result := FindVarData(V)^.VType = varNull; end;
//VarIsEmpty 判断Variant 变量是否为空
function VarIsEmpty(const V: Variant): Boolean; begin Result := FindVarData(V)^.VType = varEmpty; end;
引用Variants 后,其实还有两个函数也是可以使用的:
function Unassigned: Variant; // 未赋值的标准常数 function Null: Variant; // 空 标准常数
好的代码像粥一样,都是用时间熬出来的