System.Variants.VarResultCheck
Delphi
procedure VarResultCheck(AResult: HRESULT); overload;
procedure VarResultCheck(AResult: HRESULT; ASourceType, ADestType: TVarType); overload;
C++
extern DELPHI_PACKAGE void __fastcall VarResultCheck(HRESULT AResult)/* overload */;
Eigenschaften
Typ | Sichtbarkeit | Quelle | Unit | Übergeordnet |
---|---|---|---|---|
procedure function |
public | System.Variants.pas System.Variants.hpp |
System.Variants | System.Variants |
Beschreibung
Löst eine Varianten-Exception auf der Basis des HRESULT-Wertes aus.
VarResultCheck prüft den von vielen Varianten-Routinen zurückgegebenen HRESULT-Wert. Wenn AResult den Wert S_OK hat, führt VarResultCheck nichts aus. Ansonsten versucht VarResultCheck, AResult einer Varianten-Exception zuzuordnen und diese Exception auszulösen. Wenn dies nicht möglich ist, löst VarResultCheck eine EVariantError-Exception aus.
Wenn die Operation Konvertierungen zwischen zwei Variantentypen betrifft, geben Sie ASourceType und ADestType an.