Skip to content

    VarResultCheck

    Check the result of an operation and raise exception if not OK.

    Declaration

    Source position: variants.pp line 319

    procedure VarResultCheck(AResult: HRESULT);

    procedure VarResultCheck(AResult: HRESULT; ASourceType: tvartype; 
                        ADestType: tvartype);

    Description

    VarResultCheck checks the result aResult. If it differs from VAR_OK then an appropriate exception is raised based on the error code. If a source and destination type ASourceType and aDestType are specified they are included in the error message.

    See also

    Name Description
    VarOverflowError Raise an EVariantOverflowError error.
    VarInvalidNullOp Raise an EVariantInvalidOpError error.
    VarInvalidOp Raise a EVariantInvalidOpError error.
    VarBadIndexError Raise an EVariantBadIndexError error.
    VarArrayLockedError Raise an EVariantArrayLockedError error.