Implemented CreateStreamOnHGLOBAL.

ole/Makefile.in

@@ -12,6 +12,7 @@ C_SRCS = \
 	compositemoniker.c \
 	filemoniker.c \
 	guid.c \
+	hglobalstream.c \
 	ifs.c \
 	itemmoniker.c \
 	moniker.c \

ole/ole2stubs.c

@@ -274,15 +274,6 @@ HRESULT WINAPI OleRegEnumVerbs (REFCLSID clsid, LPENUMOLEVERB* ppenum)
 }
 
 /***********************************************************************
- *           CreateStreamOnHGlobal     [OLE32.61]
- */
-HRESULT WINAPI CreateStreamOnHGlobal (HGLOBAL hGlobal, BOOL fDeleteOnRelease, LPSTREAM* ppstm)
-{
-    FIXME(ole,"(%x,%x,%p), stub!\n", hGlobal, fDeleteOnRelease, ppstm);
-    return S_OK;
-}
-
-/***********************************************************************
  *           OleSave     [OLE32.124]
  */
 HRESULT WINAPI OleSave(

ole/stg_stream.c

@@ -169,7 +169,7 @@ HRESULT WINAPI StgStreamImpl_QueryInterface(
   {
     *ppvObject = (IStream*)This;
   }
-  else if (memcmp(&IID_IStorage, riid, sizeof(IID_IStream)) == 0) 
+  else if (memcmp(&IID_IStream, riid, sizeof(IID_IStream)) == 0) 
   {
     *ppvObject = (IStream*)This;
   }
@@ -644,7 +644,6 @@ HRESULT WINAPI StgStreamImpl_CopyTo(
 				    ULARGE_INTEGER* pcbRead,      /* [out] */        
 				    ULARGE_INTEGER* pcbWritten)   /* [out] */        
 {
-  StgStreamImpl* const This=(StgStreamImpl*)iface;
   HRESULT        hr = S_OK;
   BYTE           tmpBuffer[128];
   ULONG          bytesRead, bytesWritten, copySize;