Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Returning COM Info
Message
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Miscellaneous
Thread ID:
00673352
Message ID:
00673438
Views:
20
Sorry but I was never able to force Rick's registry.prg to work properly.
Therefore I used to use code which I sent to you. What was the error you got?

>That program did not work. It errored out. I do, however,
>have Rick Strahl's Registry.Prg.
>
>My code is:
>
>
>
>#DEFINE HKEY_CLASSES_ROOT -2147483648
>
>CLEAR
>
>SET PROCEDURE TO Registry.prg
>oReg = CREATEOBJECT('registry')
>
>oDll     = CREATEOBJECT("MyDll.MyClass")
>cClassId = COMCLASSINFO(oDll, 4)
>cClassId = "CLSID\" + cClassId + "\InProcServer32"
>
>? oReg.ReadRegistryString(HKEY_CLASSES_ROOT, cClassId, "ThreadingModel")
>? oReg.ReadRegistryString(HKEY_CLASSES_ROOT, cClassId, "(Default)")
>
>RETURN
>
>The first call to ReadRegistryString returns "Apartment", which is right.
>But the second, to get back the Default key, returns null.
>
>So how do I read the default key?
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform