System.Variants.TCustomVariantType.CastTo
Delphi
procedure CastTo(var Dest: TVarData; const Source: TVarData;
const AVarType: TVarType); virtual;
C++
virtual void __fastcall CastTo(TVarData &Dest, const TVarData &Source, const System::Word AVarType);
Propriétés
Type | Visibilité | Source | Unité | Parent |
---|---|---|---|---|
procedure function |
public | System.Variants.pas System.Variants.hpp |
System.Variants | TCustomVariantType |
Description
Convertit les données au format de ce type Variant personnalisé (TCustomVariantType) dans le format d'un autre type Variant.
Redéfinissez CastTo pour permettre le transtypage des Variants de ce type personnalisé dans les autres types Variant.
Dest représente un enregistrement TVarData qui renvoie les données du Variant stockées dans le format identifié par le paramètre AVarType. La méthode CastTo remplit cet enregistrement.
Source représente les données d'un Variant de ce type Variant personnalisé. CastTo extrait les données de cet enregistrement, les convertit dans le format défini par AVarType puis remplit Dest. Si le champ VType de la source diffère de la propriété VarType, CastTo crée une instance des données Variant associées et les transtype dans le type de destination.
AVarType représente le type dans lequel les données doivent être converties.