* and a fix from Zvoni from the forum. lpolestreamvtbl is a pointer to the vtbl record

packages/winunits-base/src/activex.pp

@@ -4415,7 +4415,7 @@ type
      end;
      OLESTREAMVTBL =  _OLESTREAMVTBL;
 
-     LPOLESTREAMVTBL = OLESTREAMVTBL;
+     LPOLESTREAMVTBL = ^OLESTREAMVTBL;
 
      _OLESTREAM = record
           lpstbl : LPOLESTREAMVTBL;