* fix for #34375, make lpshcolumnid a pointer.

git-svn-id: trunk@39852 -

packages/winunits-base/src/shlobj.pp

@@ -1018,7 +1018,7 @@ Type
       TCATEGORY_INFO = CATEGORY_INFO;
       PCATEGORY_INFO = ^CATEGORY_INFO;
 
-      LPSHColumnID = SHColumnID;
+      LPSHColumnID = ^SHColumnID;
       TSHColumnid = SHColumnID;
       pSHColumnID = LPSHColumnID;