From 5ae88daf6334ec47a1689971dd8f182574416340 Mon Sep 17 00:00:00 2001 From: Andrew Eikum Date: Fri, 31 May 2013 15:06:14 -0500 Subject: [PATCH] oleaut32: Implement ICreateTypeInfo::SetVarHelpContext. --- dlls/oleaut32/typelib.c | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/dlls/oleaut32/typelib.c b/dlls/oleaut32/typelib.c index b6f2e9259c0..098100d52c1 100644 --- a/dlls/oleaut32/typelib.c +++ b/dlls/oleaut32/typelib.c @@ -9220,8 +9220,16 @@ static HRESULT WINAPI ICreateTypeInfo2_fnSetVarHelpContext(ICreateTypeInfo2 *ifa UINT index, DWORD helpContext) { ITypeInfoImpl *This = info_impl_from_ICreateTypeInfo2(iface); - FIXME("%p %u %d - stub\n", This, index, helpContext); - return E_NOTIMPL; + TLBVarDesc *var_desc = &This->vardescs[index]; + + TRACE("%p %u %d\n", This, index, helpContext); + + if(index >= This->cVars) + return TYPE_E_ELEMENTNOTFOUND; + + var_desc->HelpContext = helpContext; + + return S_OK; } static HRESULT WINAPI ICreateTypeInfo2_fnSetMops(ICreateTypeInfo2 *iface, -- 2.11.4.GIT