System.Variants.TCustomVariantType.Cast
Delphi
procedure Cast(var Dest: TVarData; const Source: TVarData); virtual;
C++
virtual void __fastcall Cast(TVarData &Dest, const TVarData &Source);
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 d'un autre type Variant dans le format de données de ce type personnalisé.
Redéfinissez Cast pour permettre le transtypage des autres types de Variants dans ce type Variant personnalisé.
Dest représente un enregistrement TVarData qui renvoie les données du Variant stockées dans le format utilisé par ce type Variant personnalisé. La méthode Cast remplit cet enregistrement à partir des informations contenues dans Source.
Source représente un enregistrement TVarData qui contient les données d'un autre type Variant. Consultez le champ VType de Source pour identifier comment les données y sont stockées. Utilisez ensuite les autres champs pour récupérer les données et les convertir dans le format utilisé par ce type Variant.
Telle qu'implémentée dans TCustomVariantType, Cast vérifie si Source est un autre type Variant personnalisé. Si tel est le cas, elle appelle sa méthode CastTo pour effectuer une conversion vers ce type Variant. Sinon, elle déclenche une erreur système indiquant un transtypage incorrect.