* sizeof(tagVariant) should be 24 for 64 bit targets, so it is assignment-compatible with Variant type. Resolves #22050.

git-svn-id: trunk@21486 -

packages/winunits-base/src/activex.pp

@@ -1528,6 +1528,7 @@ TYPE
 
        VT_BYREF or VT_INT:      (pintVal: PLongint);
        VT_BYREF or VT_UINT:     (puintVal: PLongWord);
+       VT_RECORD:               (pvRecord: Pointer; pRecInfo: Pointer {IRecordInfo});
      );
    1: (decVal: TDECIMAL);
    end;