hi,

i try to read where Programm is installed

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Installer\UserData

   oReg1 := XbpReg():NEW(cSuch)
   IF oReg1:Status()

this works fine. next i get a List of Subkeys

   aList1 := oReg1:KeyList()

the last Subkey is what i want

   nMax   := LEN(aList1)
   cSuch  += "\"+aList1[nMax]

now open Subkey

   oReg2 := XbpReg():NEW(cSuch)
   IF oReg2:Status()

this work on XP but not under Win7 ((

      aList2 := oReg2:KeyList()
      iMax   := LEN(aList2)
      FOR  i := 1 TO iMax
         IF aList2[i] = "Components"

so i do not get here ...

when use REGEDIT i have to take "ownership" of Object
( Replace owner  on sub containers and objects )

is there a Way in a Xbase++ to do this ?
i just want to "readonly" where Application with

Components\8AE833858XV134e4C8E9D13DC7618711
"B364C79554262fe43800D74F1319CF1E"

is installed ( Xbase++ XVIDE.EXE ) under Win7

greetings by OHR
Jimmy