Results 1 to 12 of 12

Thread: A "Wraparound" IUnknown so the 3 members got visible.

Threaded View

  1. #1

    Thread Starter
    Fanatic Member
    Join Date
    Mar 2023
    Posts
    976

    A "Wraparound" IUnknown so the 3 members got visible.

    Since IUnknown Interface (which is the stemfather of most of all the Interfaces in the Shell32 Interfaces I see it abit awkward why just this interface shall be "hidden" within the OleExp TypeLib (It was never hidden within the EnumDeskVB TypeLib from 1998).
    Here is a little walkaround to make these 3 members availabale/Visible.

    Code:
    Public Function GetIUnknown() As oleexp.IUnknown
      Dim pISF As IShellFolder
      Dim ppISF As Long
      Dim pIUnk As oleexp.IUnknown
      
      SHGetDesktopFolder ppISF
      
      MoveMemory pISF, ppISF, 4
      
      Set pIUnk = pISF
      
      Set GetIUnknown = pIUnk
      
    End Function
    You can also add a pidl, path or an object to Create a IShellItem and get the IUnknown from there.
    Last edited by nebeln; Dec 6th, 2023 at 08:50 PM.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width