ole32: Implement writing VT_CLSID properties.

09202ee9 · André Hentschel · Alexandre Julliard · d9889cfd · 09202ee9
Commit 09202ee9 authored Nov 13, 2011 by André Hentschel Committed by Alexandre Julliard Nov 15, 2011
Hide whitespace changes
Inline Side-by-side

Showing with 9 additions and 0 deletions

stg_prop.c dlls/ole32/stg_prop.c +9 -0

No files found.
--- a/dlls/ole32/stg_prop.c
+++ b/dlls/ole32/stg_prop.c
@@ -1746,6 +1746,15 @@ static HRESULT PropertyStorage_WritePropertyToStream(PropertyStorage_impl *This,
        bytesWritten = count + sizeof cf_hdr;
        break;
    }
+    case VT_CLSID:
+    {
+        CLSID temp;
+
+        StorageUtl_WriteGUID((BYTE *)&temp, 0, var->u.puuid);
+        hr = IStream_Write(This->stm, &temp, sizeof(temp), &count);
+        bytesWritten = count;
+        break;
+    }
    default:
        FIXME("unsupported type: %d\n", var->vt);
        return STG_E_INVALIDPARAMETER;