PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV 2024 → RegistreExiste
RegistreExiste
Iniciado por guest, ago., 01 2005 2:11 PM - Sem resposta
Publicado em agosto, 01 2005 - 2:11 PM
Bonjour,

J'ai un problème avec RegistreExiste, voici le code :

CréationClé est un booléen = RegistreEcrit ("HKEY_LOCAL_MACHINE\SOFTWARE\Appli","Licence", "0")
CréationChemin est un booléen = RegistreCréeClé("HKEY_LOCAL_MACHINE\SOFTWARE\Appli")
VérifRegistre est un booléen = RegistreExiste("HKEY_LOCAL_MACHINE\SOFTWARE\Appli","Licence")

SI VérifRegistre = Faux ALORS
SI CréationChemin = Faux ALORS
Erreur("problème registre")
Ferme
FIN
SI CréationClé = Faux ALORS
Erreur("problème registre")
Ferme
FIN
FIN

Ce code est placé à l'initialisation de la fenetre principale. Mon problème est qu'à chaque fois il recrée la valeur "licence" et donc me la remet à 0 (à 1 la licence est accepté par l'utilisateur final) donc il faut accepter la licence à chaque fois que l'on démarre le soft !!
Il faut dire aussi que j'ai fait plusieurs tests non concluants, je m'en remet à vous tous sur ce forum, en espérant avoir été assez clair !!

Merci

Cordialement,

Mike