Fix bug in VARDESC (#1644)

Author: Stefan Mücke

contrib/platform/src/com/sun/jna/platform/win32/OaIdl.java

@@ -1398,14 +1398,10 @@ public static class ByReference extends _VARDESC implements
             public VARIANT.ByReference lpvarValue;
 
             public _VARDESC() {
-                setType("lpvarValue");
-                this.read();
             }
 
             public _VARDESC(Pointer pointer) {
                 super(pointer);
-                setType("lpvarValue");
-                this.read();
             }
 
             /**
@@ -1431,9 +1427,15 @@ public VARDESC() {
 
         public VARDESC(Pointer pointer) {
             super(pointer);
-            this._vardesc.setType("lpvarValue");
             this.read();
         }
+
+        @Override
+        public void read() {
+        	readField("varkind");
+        	this._vardesc.setType(varkind.value == VARKIND.VAR_CONST ? "lpvarValue" : "oInst");
+        	super.read();
+        }
     }
 
     @FieldOrder({"tdesc", "_elemdesc"})