TCustomVariantType.CastToOle

Cast variant value to OLE value

Declaration

Source position: variants.pp line 202

public 
  procedure CastToOle(var Dest: tvardata; const Source: tvardata)
                     ;  Virtual;

Description

CastToOle is called when a variant must be cast to a value that can be used in OLE variants. Descendents must override this method to provide the desired conversion behaviour.

The TCustomVariantType implementation of CastToOle raises an 'unsupported' exception.

See also