помогите с обявлением и-фейса: с С++ в Дельфи

Vagon
Дата: 19.11.2007 14:06:52
Прошу помощи.

В интерфейсе IWMHeaderInfo (WMSDK) обьявлен метод GetAttributeByName.

в wmsdkidl.idl :
HRESULT GetAttributeByName( 
                                [in, out] WORD *pwStreamNum,
                                [in] LPCWSTR pszName,
                                [out] WMT_ATTR_DATATYPE *pType,
                                [out, size_is( *pcbLength )] BYTE *pValue,
                                [in, out] WORD *pcbLength );

то же в wmsdkidl.h :
virtual HRESULT STDMETHODCALLTYPE GetAttributeByName( 
                                /* [out][in] */ WORD *pwStreamNum,
                                /* [in] */ LPCWSTR pszName,
                                /* [out] */ WMT_ATTR_DATATYPE *pType,
                                /* [size_is][out] */ BYTE *pValue,
                                /* [out][in] */ WORD *pcbLength) = 0;

я обьявляю в Delphi :
function GetAttributeByName(  
                                var   pwStreamNum : Word;
                                pszName :     PWideChar;  //  const ?
                                out   pType :       TWMTAttrDataType;
                                pValue :      PBYTE;
                                var   pcbLength :   Word ) : HRESULT; stdcall;

Устал с глюками бороться.
Видит кто-нибудь ошибку?

Использую:
var
  pHeaderInfo : IWMHeaderInfo;
  wStreamNum : Word;
  wDataType : TWMTAttrDataType;
  wLength : Word;
  bAttribValue : PByte;
  ...
begin
  ...
  bAttribValue := AllocMem( wLength );
  try
    Result := pHeaderInfo.GetAttributeByName( 
                                                                wStreamNum,
                                                                pwAttribName,
                                                                wDataType,
                                                                bAttribValue,
                                                                wLength );

Ошибки лезут самые разные (про доступ к памяти естественно...)
Vagon
Дата: 19.11.2007 15:16:38
Может быть, подкинете ссылочку по конвертации из С++ в Дельфи?
Petro123
Дата: 19.11.2007 16:08:10
Vagon
Может быть, подкинете ссылочку по конвертации из С++ в Дельфи?

поиск, здесь было не раз