function VarType(const V: Variant): Integer;DescriptionVarType returns the type code of the given Variant. The resulting value is constructed from the following constants declared in the System unit.const  varEmpty    = $0000;
  varNull     = $0001;
  varSmallint = $0002;
  varInteger  = $0003;
  varSingle   = $0004;
  varDouble   = $0005;
  varCurrency = $0006;
  varDate     = $0007;
  varOleStr   = $0008;
  varDispatch = $0009;
  varError    = $000A;
  varBoolean  = $000B;
  varVariant  = $000C;
  varUnknown  = $000D;
  varByte     = $0011;  varStrArg   = $0048;  varString   = $0100;
  varAny      = $0101;
  varTypeMask = $0FFF;
  varArray    = $2000;  varByRef    = $4000;按F1后的结果,在system单元中有定义