delphi mysql变体类型_variant 类型如何使用(100分)

All integer, real, string, character, and Boolean types (except Int64) are assignment-compatible with Variant. Expressions can be explicitly cast as variants, and the VarAsType and VarCast standard routines can be used to change the internal representation of a variant. The following code demonstrates the use of variants and some of the automatic conversions performed when variants are mixed with other types.

var

V1, V2, V3, V4, V5: Variant;

I: Integer;

D: Double;

S: string;

begin

V1 := 1; { integer value }

V2 := 1234.5678; { real value }

V3 := 'Hello world!'; { string value }

V4 := '1000'; { string value }

V5 := V1 + V2 + V4; { real value 2235.5678}

I := V1; { I = 1 (integer value) }

D := V2; { D = 1234.5678 (real value) }

S := V3; { S = 'Hello world!' (string value) }

I := V4; { I = 1000 (integer value) }

S := V5; { S = '2235.5678' (string value) }

end;

The compiler performs type conversions according to the following rules.

TargetSourceintegerrealstringcharacterBoolean

integer

converts integer formatsconverts to realconverts to string representationsame as string (left)returns False if 0, True otherwise

real

rounds to nearest integerconverts real formatsconverts to string representation using Windows regional settingssame as string (left)returns False if 0, True otherwise

string

converts to integer, truncating if necessary; raises exception if string is not numericconverts to real using Windows regional settings; raises exception if string is not numericconverts string/character formatssame as string (left)returns False if string is 揻alse?(non朿ase-sensitive) or a numeric string that evaluates to 0, True if string is 搕rue?or a nonzero numeric string; raises exception otherwise

character

same as string (above)same as string (above)same as string (above)same as string-to-stringsame as string (above)

Boolean

False = 0,

True = ?

(255 if Byte)False = 0,

True = ?False = ??

True = 摉1?same as string (left)False = False,

True = True

Unassigned

returns 0returns 0returns empty stringsame as string (left)returns False

Null

raises exceptionraises exceptionraises exceptionsame as string (left)raises exception

Out-of-range assignments often result in the target variable getting the highest value in its range. Invalid assignments or casts raise the EVariantError exception.

Special conversion rules apply to the TDateTime real type declared in the System unit. When a TDateTime is converted to any other type, it treated as a normal Double. When an integer, real, or Boolean is converted to a TDateTime, it is first converted to a Double, then read as a date-time value. When a string is converted to a TDateTime, it is interpreted as a date-time value using the Windows regional settings. When an Unassigned value is converted to TDateTime, it is treated like the real or integer value 0. Converting a Null value to TDateTime raises an exception.

If a variant references a COM object, any attempt to convert it reads the object抯 default property and converts that value to the requested type. If the object has no default property, an exception is raised.