oleaut32: Implement GetTypeInfoCount and GetTypeInfo for standard pictures.

This commit is contained in:
Robert Shearman 2006-07-28 01:26:13 +01:00 committed by Alexandre Julliard
parent 3435560317
commit d82d374430
1 changed files with 24 additions and 4 deletions

View File

@ -1992,9 +1992,11 @@ static HRESULT WINAPI OLEPictureImpl_GetTypeInfoCount(
IDispatch* iface, IDispatch* iface,
unsigned int* pctinfo) unsigned int* pctinfo)
{ {
FIXME("():Stub\n"); TRACE("(%p)", pctinfo);
return E_NOTIMPL; *pctinfo = 1;
return S_OK;
} }
/************************************************************************ /************************************************************************
@ -2008,9 +2010,27 @@ static HRESULT WINAPI OLEPictureImpl_GetTypeInfo(
LCID lcid, LCID lcid,
ITypeInfo** ppTInfo) ITypeInfo** ppTInfo)
{ {
FIXME("():Stub\n"); static const WCHAR stdole2tlb[] = {'s','t','d','o','l','e','2','.','t','l','b',0};
ITypeLib *tl;
HRESULT hres;
return E_NOTIMPL; TRACE("(iTInfo=%d, lcid=%04x, %p)\n", iTInfo, (int)lcid, ppTInfo);
if (iTInfo != 0)
return E_FAIL;
hres = LoadTypeLib(stdole2tlb, &tl);
if (FAILED(hres))
{
ERR("Could not load stdole2.tlb\n");
return hres;
}
hres = ITypeLib_GetTypeInfoOfGuid(tl, &IID_IPictureDisp, ppTInfo);
if (FAILED(hres))
ERR("Did not get IPictureDisp typeinfo from typelib, hres %lx\n", hres);
return hres;
} }
/************************************************************************ /************************************************************************