Dmitry Timoshkov : oleaut32: IPicture::set_hPal() supports only bitmaps.

[Alexandre Julliard]

Module: wine
Branch: master
Commit: e34d570b451b30cdfef130ef0134821046ffcb62
URL:    https://source.winehq.org/git/wine.git/?a=commit;h=e34d570b451b30cdfef130ef0...

Author: Dmitry Timoshkov 
Date:   Fri Jul  6 16:09:59 2018 +0800

oleaut32: IPicture::set_hPal() supports only bitmaps.

Signed-off-by: Dmitry Timoshkov 
Signed-off-by: Alexandre Julliard

---

dlls/oleaut32/olepicture.c | 16 ++++++++++++----
 1 file changed, 12 insertions(+), 4 deletions(-)

diff --git a/dlls/oleaut32/olepicture.c b/dlls/oleaut32/olepicture.c
index 773bc21..a2a54bd 100644
--- a/dlls/oleaut32/olepicture.c
+++ b/dlls/oleaut32/olepicture.c
@@ -739,10 +739,18 @@ static HRESULT WINAPI OLEPictureImpl_Render(IPicture *iface, HDC hdc,
 static HRESULT WINAPI OLEPictureImpl_set_hPal(IPicture *iface,
    				      OLE_HANDLE hpal)
 {
-  OLEPictureImpl *This = impl_from_IPicture(iface);
-  FIXME("(%p)->(%08x): stub\n", This, hpal);
-  OLEPicture_SendNotify(This,DISPID_PICT_HPAL);
-  return E_NOTIMPL;
+    OLEPictureImpl *This = impl_from_IPicture(iface);
+
+    TRACE("(%p)->(%08x)\n", This, hpal);
+
+    if (This->desc.picType == PICTYPE_BITMAP)
+    {
+        This->desc.u.bmp.hpal = ULongToHandle(hpal);
+        OLEPicture_SendNotify(This,DISPID_PICT_HPAL);
+        return S_OK;
+    }
+
+    return E_FAIL;
 }

/************************************************************************