System.Variants.TCustomVariantType.CastToOle
Delphi
procedure CastToOle(var Dest: TVarData; const Source: TVarData); virtual;
C++
virtual void __fastcall CastToOle(TVarData &Dest, const TVarData &Source);
Eigenschaften
| Typ | Sichtbarkeit | Quelle | Unit | Übergeordnet |
|---|---|---|---|---|
procedure function |
public | System.Variants.pas System.Variants.hpp |
System.Variants | TCustomVariantType |
Beschreibung
Konvertiert die Daten des benutzerdefinierten Variant-Typs in ein Format, das von COM-Varianten verwendet werden kann.
Überschreiben Sie CastToOle, um die benutzerdefinierte Variante in einen Typ zu konvertieren, der in COM-Schnittstellenaufrufen verwendet werden kann. Die Konvertierung wird automatisch in den ähnlichesten automatisierungskompatiblen Variant-Typ durchgeführt.
Dest ist ein Record (TVarData), in dem die Daten des Variant-Objekts in einem automatisierungskompatiblen Format zurückgegeben werden.
Source ist ein Record (TVarData) mit den Daten eines Variant-Objekts dieses benutzerdefinierten Typs.
In TCustomVariantType ermittelt CastToOle zuerst mit Hilfe der Methode OlePromotion den automatisierungskompatiblen Zieltyp für Source. Danach wird mit CastTo die eigentliche Konvertierung durchgeführt.