Leer valores del Registry versión OOP

Leer valores del Registro de Windows es fácil, si usas Visual FoxPro y las Fox Foundation Classes (FFC), aquí te enseñamos cómo....

Otra de las clases que se encuentran en las Fox Foundation Classes es la llamada Registry Access, la cual está accesible por medio del IDE de VFP.

Tools -> Component Gallery -> FFCs -> Utilities

Con esta clase se pueden hacer multitud de cosas con respecto al Manejo del Registry, a continuación un pequeño ejemplo (cortesía de Alex Feldstein en las newsgroups de Microsoft):

** Ejemplo de Registry.vcx:
** Abrir una llave (key) usando el metodo OpenKey().
** Si no especificas una llave, el default es HKEY_CLASSES_ROOT
 
 oReg = NEWOBJECT("registry",HOME(1)+"ffc\registry.vcx")
 lcKey = "VisualFoxPro.ApplicationCurVer"
 if oReg.OpenKey(lckey) = 0
   * sin error
   lcvalue = ""
   if oReg.GetKeyValue("", @lcvalue) = 0
     * sin error
     ? lcvalue
   endif
   oReg.CloseKey()
 endif 

Espero les sea de utilidad.

Espartaco Palma Martínez