Variant() [16/16]

System.Variant.Variant ( object obj )

inline

Definition at line 233 of file Variant.cs.

    {
        _data = 0L;
        VarEnum varEnum = VarEnum.VT_EMPTY;
        if (obj is DateTime)
        {
            _objref = null;
            _flags = 16;
            _data = ((DateTime)obj).Ticks;
            return;
        }
        if (obj is string)
        {
            _flags = 14;
            _objref = obj;
            return;
        }
        if (obj == null)
        {
            this = Empty;
            return;
        }
        if (obj == System.DBNull.Value)
        {
            this = DBNull;
            return;
        }
        if (obj == Type.Missing)
        {
            this = Missing;
            return;
        }
        if (obj is Array)
        {
            _flags = 65554;
            _objref = obj;
            return;
        }
        _flags = 0;
        _objref = null;
        if (obj is UnknownWrapper)
        {
            varEnum = VarEnum.VT_UNKNOWN;
            obj = ((UnknownWrapper)obj).WrappedObject;
        }
        else if (obj is DispatchWrapper)
        {
            varEnum = VarEnum.VT_DISPATCH;
            obj = ((DispatchWrapper)obj).WrappedObject;
        }
        else if (obj is ErrorWrapper)
        {
            varEnum = VarEnum.VT_ERROR;
            obj = ((ErrorWrapper)obj).ErrorCode;
        }
        else if (obj is CurrencyWrapper)
        {
            varEnum = VarEnum.VT_CY;
            obj = ((CurrencyWrapper)obj).WrappedObject;
        }
        else if (obj is BStrWrapper)
        {
            varEnum = VarEnum.VT_BSTR;
            obj = ((BStrWrapper)obj).WrappedObject;
        }
        if (obj != null)
        {
            SetFieldsObject(obj);
        }
        if (varEnum != 0)
        {
            _flags |= (int)varEnum << 24;
        }
    }

References System.Variant._data, System.Variant._flags, System.Variant._objref, System.DateTime, System.Variant.DBNull, System.Variant.Empty, System.L, System.Type.Missing, System.Variant.Missing, System.obj, System.Variant.SetFieldsObject(), and System.DBNull.Value.