Alistair Leslie-Hughes : wbemprox: Support using record in IWbemClassObject Next.

[Alexandre Julliard]

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

Author: Alistair Leslie-Hughes <leslie_alistair at hotmail.com>
Date:   Wed May 26 15:59:27 2021 +1000

wbemprox: Support using record in IWbemClassObject Next.

Makes the code the same as class_object_Get.

Signed-off-by: Alistair Leslie-Hughes <leslie_alistair at hotmail.com>
Signed-off-by: Hans Leidekker <hans at codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard at winehq.org>

---

 dlls/wbemprox/class.c | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/dlls/wbemprox/class.c b/dlls/wbemprox/class.c
index 2f7752e8671..3b7bc066aea 100644
--- a/dlls/wbemprox/class.c
+++ b/dlls/wbemprox/class.c
@@ -546,7 +546,17 @@ static HRESULT WINAPI class_object_Next(
         if (is_method( table, i )) continue;
         if (!is_result_prop( view, table->columns[i].name )) continue;
         if (!(prop = SysAllocString( table->columns[i].name ))) return E_OUTOFMEMORY;
-        if ((hr = get_propval( view, obj->index, prop, pVal, pType, plFlavor )) != S_OK)
+        if (obj->record)
+        {
+            UINT index;
+
+            if ((hr = get_column_index( table, table->columns[i].name, &index )) == S_OK)
+                hr = record_get_value( obj->record, index, pVal, pType );
+        }
+        else
+            hr = get_propval( view, obj->index, prop, pVal, pType, plFlavor );
+
+        if (FAILED(hr))
         {
             SysFreeString( prop );
             return hr;