Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Getregkey()
Message
From
25/01/2000 10:36:18
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
 
 
To
25/01/2000 09:08:15
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Miscellaneous
Thread ID:
00322097
Message ID:
00322197
Views:
24
>>>Can anybody give me an example how to use getregkey()
>>
>>
Cemal,
>>Check FFC Registry.vcx - registry class code and solution.app Read&Write reg. values.
>>Sample below simply queries a Class registration.
>>
*function _IsClassRegistered
>>*? _IsClassRegistered("Word.Application")
>>lparameters tcClass
>>#DEFINE HKEY_CLASSES_ROOT    -2147483648
>>#DEFINE ERROR_SUCCESS		0	&& OK
>>
>>DECLARE Integer RegOpenKey IN Win32API ;
>>	Integer nHKey, String @cSubKey, Integer @nResult
>>
>>DECLARE Integer RegCloseKey IN Win32API ;
>>	Integer nHKey
>>
>>local lnKey
>>lnKey = 0
>>llRetVal = ( RegOpenKey(HKEY_CLASSES_ROOT, tcClass, @lnKey) = ERROR_SUCCESS )
>>if llRetVal
>>  RegCloseKey(lnKey)
>>endif
>>CLEAR DLLS
>>return llRetVal
Cetin
>
>Çetin;
>I have tried the code on top
>but its returns data type mismatch error on this line
>
>llRetVal = ( RegOpenKey(HKEY_CLASSES_ROOT, tcClass, @lnKey) = ERROR_SUCCESS )
>
>thanks
>cemal


Cemal,
I haven't done type checking there. Do you pass a class name as string ? e.g. :
? _IsClassRegistered("Scripting.FileSystemObject")
Cetin
Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad
Previous
Reply
Map
View

Click here to load this message in the networking platform