AYUDA EN LÍNEA
 WINDEVWEBDEV Y WINDEV MOBILE

Este contenido se ha traducido automáticamente.  Haga clic aquí  para ver la versión en inglés.
Ayuda / WLanguage / Funciones WLanguage / Funciones estándar / Funciones de Windows / Funciones del registro
WINDEV
WindowsLinuxUniversal Windows 10 AppJavaReportes y ConsultasCódigo de Usuario (UMC)
WEBDEV
WindowsLinuxPHPWEBDEV - Código Navegador
WINDEV Mobile
AndroidWidget Android iPhone/iPadIOS WidgetApple WatchMac CatalystUniversal Windows 10 App
Otros
Procedimientos almacenados
Comprueba la existencia de una clave en el registro de Windows.
Ejemplo
// Checks the existence of the "HKEY_LOCAL_MACHINE\SOFTWARE\MyApp" key
ResExist = RegistryExist("HKEY_LOCAL_MACHINE\SOFTWARE\MyApp")
Sintaxis

Comprobar la existencia de una clave o valor clave Ocultar los detalles

<Result> = RegistryExist([<Access mode>, ] <Key path> [, <Value name>])
<Result>: booleano
  • True si existe la clave o el valor especificado,
  • False en caso contrario.
<Access mode>: Constante de tipo Integer
Modo de acceso al registro:
registryMode32Modo forzado para acceder al registro como un programa de 32 bits.
registryMode64Modo forzado para acceder al registro como un programa de 64 bits.
registryModeAuto
(Valor predeterminado)
Modo de acceso al registro de automatic:
  • una aplicación de 32 bits que se ejecuta en un sistema de 32 bits manipula el registro como un programa de 32 bits.
  • una aplicación de 32 bits que se ejecuta en un sistema de 64 bits manipula el registro desde la siguiente rama:
    HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node
  • una aplicación de 64 bits que se ejecuta en un sistema de 64 bits manipula el registro como un programa de 64 bits.
<Key path>: Cadena de caracteres
Ruta de la clave a comprobar.
<Value name>: Cadena de caracteres opcional
Nombre del valor a verificar. Si no se especifica este parámetro, el valor comprobado será el valor "<Default>".. Para comprobar el valor "<Default>", <Nombre del valor> debe ser "0".

Comprobación de la existencia de un valor clave identificado por su índice Ocultar los detalles

<Result> = RegistryExist([<Access mode>, ] <Key path> , <Value index>)
<Result>: booleano
  • True si existe el valor especificado,
  • False en caso contrario.
<Access mode>: Constante de tipo Integer
Modo de acceso al registro:
registryMode32Modo forzado para acceder al registro como un programa de 32 bits.
registryMode64Modo forzado para acceder al registro como un programa de 64 bits.
registryModeAuto
(Valor predeterminado)
Modo de acceso al registro de automatic:
  • una aplicación de 32 bits que se ejecuta en un sistema de 32 bits manipula el registro como un programa de 32 bits.
  • una aplicación de 32 bits que se ejecuta en un sistema de 64 bits manipula el registro desde la siguiente rama:
    HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node
  • una aplicación de 64 bits que se ejecuta en un sistema de 64 bits manipula el registro como un programa de 64 bits.
<Key path>: Cadena de caracteres
Ruta de la clave a comprobar.
<Value index>: Integro
Índice del valor a comprobar. Si no se especifica este parámetro, el valor comprobado será el valor "<Default>".. Para comprobar el valor "<Default>", <Índice de valor> debe ser "0".
Clasificación Lógica de negocio / UI: Lógica de negocio
Componente: wd290std.dll
Versión mínima requerida
  • Versión 9
Esta página también está disponible para…
Comentarios
Exemplo Resgistro Windows - Ler e Gravar
//-- Global
PROCEDURE MyWindow()
gn_id_usuario is int=0
//Global declarations
_chave_senha is string="HKEY_CURRENT_USER\Software\erpmatos\"
//----------------------
//--End of

//Ler Chave
n_usuario is int=RegistryQueryValue(_chave_senha,"Usuario")
CBOX_salvar=RegistryQueryValue(_chave_senha,"Salvar")
IF CBOX_salvar=True THEN
COMBO_Usuario_matos_1=n_usuario
LSV_Usuario_matos=n_usuario
s_senha is string=RegistryQueryValue(_chave_senha,"Senha")
EDT_senha = Uncrypt(s_senha, "Password")
END
//-----------------------
//Gravar Chave
//Check box Salvar
n_usuario is int=0
IF RegistryExist(_chave_senha) = False THEN
RegistryCreateKey(_chave_senha)
END
n_usuario=COMBO_Usuario_matos_1
s_nome_usuario is string=""
RegistrySetValue(_chave_senha,"Usuario",n_usuario)
RegistrySetValue(_chave_senha,"Senha",Crypt(EDT_senha,"Password"))
HReadSeekFirst(usuario_matos,usuario_matosID,n_usuario)
IF HFound(usuario_matos) THEN
RegistrySetValue(_chave_senha,"UsuarioNome",s_nome_usuario)
ELSE
RegistrySetValue(_chave_senha,"UsuarioNome","")
END
IF CBOX_salvar=True THEN
RegistrySetValue(_chave_senha,"Salvar",1)
ELSE
RegistrySetValue(_chave_senha,"Salvar",0)
END
//--
//--Botao Salvar
IF CBOX_salvar=True THEN
n_usuario is int=0
n_usuario=COMBO_Usuario_matos_1
RegistrySetValue(_chave_senha,"Usuario",n_usuario)
RegistrySetValue(_chave_senha,"Senha",Crypt(EDT_senha,"Password"))
RegistrySetValue(_chave_senha,"UsuarioNome",gs_usuario_nome)
END

//Blog Video e Exemplo
http://windevdesenvolvimento.blogspot.com.br/2016/03/curso-windev-registro-windows-001.html
De matos AMARILDO
28 03 2016

Última modificación: 27/05/2022

Señalar un error o enviar una sugerencia | Ayuda local