ole32: Add support for writing VT_BLOB properties.

Wine-Bug: https://bugs.winehq.org/show_bug.cgi?id=50917Signed-off-by: Nikolay Sivov <nsivov@codeweavers.com> Signed-off-by: Alexandre Julliard <julliard@winehq.org>

ole32: Add support for writing VT_BLOB properties.
ade78855 · Nikolay Sivov · Alexandre Julliard · 3db37dc5 · ade78855
Commit ade78855 authored Apr 05, 2021 by Nikolay Sivov Committed by Alexandre Julliard Apr 05, 2021
Hide whitespace changes
Inline Side-by-side

Showing with 10 additions and 0 deletions

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

No files found.
--- a/dlls/ole32/stg_prop.c
+++ b/dlls/ole32/stg_prop.c
@@ -2267,6 +2267,16 @@ static HRESULT PropertyStorage_WritePropertyToStream(PropertyStorage_impl *This,
        bytesWritten = count;
        break;
    }
+    case VT_BLOB:
+    {
+        StorageUtl_WriteDWord(&dwTemp, 0, var->blob.cbSize);
+        hr = IStream_Write(This->stm, &dwTemp, sizeof(dwTemp), &count);
+        if (FAILED(hr))
+            goto end;
+        hr = IStream_Write(This->stm, var->blob.pBlobData, var->blob.cbSize, &count);
+        bytesWritten = count + sizeof(DWORD);
+        break;
+    }
    default:
        FIXME("unsupported type: %d\n", var->vt);
        return STG_E_INVALIDPARAMETER;