0/5 (3 avis)
Snippet vu 6 369 fois - Téléchargée 36 fois
Procedure EcritRegString(Root :HKey; Chemin, NomClee, ValeurClee :string); var HK :HKEY; begin RegOpenKey(Root,PChar(Chemin),HK); // on ouvre la clée if HK = 0 then // si la clée n'existe pas on la crée RegCreateKeyEx(Root,PChar(chemin),0,nil,REG_OPTION_NON_VOLATILE,KEY_ALL_ACCESS,nil,HK,@DW); //RegCreateKey(Root,PChar(chemin),HK); // pas pour win 3.1, ça existe encore ;-D RegSetValueEx(HK,PChar(NomClee),0, REG_SZ, Pchar(ValeurClee),Length(ValeurClee)); // on ecrit la valeur RegCloseKey(HK); // on referme la clée end;
16 mars 2003 à 14:45
Merci.
16 mars 2003 à 13:25
;-)
16 mars 2003 à 12:54
Dans l'aide, il est écrit : "The RegCreateKey function creates the specified key. If the key already exists in the registry, the function opens it. This function is provided for compatibility with Windows version 3.1. Win32-based applications should use the RegCreateKeyEx function."
Tu peux nous en faire une autre avec RegCreatekeyEx ?
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.