获取变量数据类型的程序

Delphi syntax:

 

function VarType(const V: Variant): TVarType;

 

 

 

VarType                      Contents of variant

 

varEmpty                    The variant is Unassigned.

varNull                        The variant is Null.

varSmallint                 16-bit signed integer (type Smallint in Delphi, short in C++ ).

varInteger                  32-bit signed integer (type Integer in Delphi, int in C++).

varSingle                    Single-precision floating-point value (type Single in Delphi)

varDouble                   Double-precision floating-point value (type double).

varCurrency                Currency floating-point value (type Currency).

varDate                      Date and time value (type TDateTime).

 

varOleStr                    Reference to a dynamically allocated UNICODE string.

varDispatch