Информация об изменениях

Сообщение Re[2]: Прошу помощи в получении SAFEARRAY с помощью InvokeHe от 30.04.2020 7:26

Изменено 30.04.2020 7:28 Vi2

Старый текст
Новый текст
Разница

Re[2]: Прошу помощи в получении SAFEARRAY с помощью InvokeHelper

Здравствуйте, _agg, Вы писали:

По поводу первого сообщения:

InvokeHelper(0x1a, DISPATCH_METHOD, VT_ARRAY, (void*)&arr, parms, paramId);

В документации говорится, что InvokeHelper не понимает такой тип. Можно, конечно, попробовать скормить ему VT_ARRAY|VT_UI1, наверное, с тем же эффектом. Так что остаётся вариант с VT_VARIANT и приведением массивов как показано ниже.

_>У COleDispatchDriver есть поле m_lpDispatch типа IDispatch пробуем:
_>Вызов метода:

_>CComSafeArray<BYTE> array(1024); 
_>m_error = p->getParamByteArray(param::LIBFPTR_PARAM_OFD_FISCAL_SIGN, array.GetSafeArrayPtr());

_>    long getParamByteArray(long paramId, SAFEARRAY **parray) {
_>        DISPPARAMS dispparams;
_>        VARIANTARG varArgIn;
_>        VARIANTARG varArgResult;
_>        varArgResult.parray =*parray;
_>        VariantInit(&varArgIn);
_>        VariantInit(&varArgResult);
        
_>        V_VT(&varArgIn) = (VT_INT);
_>        V_VT(&varArgResult) = (VT_ARRAY | VT_UI1);

_>        memset(&dispparams, 0, sizeof(DISPPARAMS));
_>        dispparams.rgvarg = &varArgIn;
_>        dispparams.cArgs = 1;

_>        UINT nErrArg;
_>        EXCEPINFO excepinfo;
_>        HRESULT hr = m_lpDispatch->Invoke(0x1a, IID_NULL, LOCALE_SYSTEM_DEFAULT, DISPATCH_METHOD, &dispparams, &varArgResult, &excepinfo, &nErrArg);
_>        return hr;
_>    }

_>Запускаем, исключения нет, hr равен S_OK, но массив пуст... Это метод глючит или я что то неправильно делаю... ???

Параметр же out, retval, так что все выкрутасы с V_VT(&varArgResult) = (VT_ARRAY|VT_UI1) и varArgResult.parray =*parray не пройдут. Нужно просто принять вариант из метода и вернуть его значение в требуемой форме.

    VARIANTARG varArgResult;
    VariantInit(&varArgResult);
        
    HRESULT hr = m_lpDispatch->Invoke(0x1a, IID_NULL, LOCALE_SYSTEM_DEFAULT, DISPATCH_METHOD, &dispparams, &varArgResult, &excepinfo, &nErrArg);
    if (SUCCEEDED(hr))
        parray[0] = V_ARRAY(&varArgResult);

Re[2]: Прошу помощи в получении SAFEARRAY с помощью InvokeHe

Здравствуйте, _agg, Вы писали:

По поводу первого сообщения:

InvokeHelper(0x1a, DISPATCH_METHOD, VT_ARRAY, (void*)&arr, parms, paramId);

_>CComSafeArray<BYTE> array(1024); 
_>m_error = p->getParamByteArray(param::LIBFPTR_PARAM_OFD_FISCAL_SIGN, array.GetSafeArrayPtr());

_>    long getParamByteArray(long paramId, SAFEARRAY **parray) {
_>        DISPPARAMS dispparams;
_>        VARIANTARG varArgIn;
_>        VARIANTARG varArgResult;
_>        varArgResult.parray =*parray;
_>        VariantInit(&varArgIn);
_>        VariantInit(&varArgResult);
        
_>        V_VT(&varArgIn) = (VT_INT);
_>        V_VT(&varArgResult) = (VT_ARRAY | VT_UI1);

_>        memset(&dispparams, 0, sizeof(DISPPARAMS));
_>        dispparams.rgvarg = &varArgIn;
_>        dispparams.cArgs = 1;

_>        UINT nErrArg;
_>        EXCEPINFO excepinfo;
_>        HRESULT hr = m_lpDispatch->Invoke(0x1a, IID_NULL, LOCALE_SYSTEM_DEFAULT, DISPATCH_METHOD, &dispparams, &varArgResult, &excepinfo, &nErrArg);
_>        return hr;
_>    }

    VARIANTARG varArgResult;
    VariantInit(&varArgResult);
        
    HRESULT hr = m_lpDispatch->Invoke(0x1a, IID_NULL, LOCALE_SYSTEM_DEFAULT, DISPATCH_METHOD, &dispparams, &varArgResult, &excepinfo, &nErrArg);
    if (SUCCEEDED(hr))
        parray[0] = V_ARRAY(&varArgResult);

PS
Вместо VT_INT лучше использовать VT_I4.