OLE: fix handling of INVOKE_PROPERTYGET flag in ITypeComp_fnBind.
The INVOKE_PROPERTYGET flag shouldn't affect binding to variables; it should just affect which of a pair of [propget] and [propput] functions should be returned.
This commit is contained in:
parent
067f09604a
commit
a61e4e802c
|
@ -6370,8 +6370,6 @@ static HRESULT WINAPI ITypeComp_fnBind(
|
||||||
ITypeInfo_AddRef(*ppTInfo);
|
ITypeInfo_AddRef(*ppTInfo);
|
||||||
return S_OK;
|
return S_OK;
|
||||||
} else {
|
} else {
|
||||||
if (!(wFlags & ~(INVOKE_PROPERTYGET)))
|
|
||||||
{
|
|
||||||
for(pVDesc = This->varlist; pVDesc; pVDesc = pVDesc->next) {
|
for(pVDesc = This->varlist; pVDesc; pVDesc = pVDesc->next) {
|
||||||
if (!strcmpW(pVDesc->Name, szName)) {
|
if (!strcmpW(pVDesc->Name, szName)) {
|
||||||
HRESULT hr = TLB_AllocAndInitVarDesc(&pVDesc->vardesc, &pBindPtr->lpvardesc);
|
HRESULT hr = TLB_AllocAndInitVarDesc(&pVDesc->vardesc, &pBindPtr->lpvardesc);
|
||||||
|
@ -6384,7 +6382,6 @@ static HRESULT WINAPI ITypeComp_fnBind(
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
|
||||||
/* FIXME: search each inherited interface, not just the first */
|
/* FIXME: search each inherited interface, not just the first */
|
||||||
if (This->TypeAttr.cImplTypes) {
|
if (This->TypeAttr.cImplTypes) {
|
||||||
/* recursive search */
|
/* recursive search */
|
||||||
|
|
Loading…
Reference in New Issue