Registre
sebastienbro
Messages postés
246
Date d'inscription
dimanche 14 avril 2002
Statut
Membre
Dernière intervention
5 août 2004
-
28 avril 2002 à 17:15
cs_Delphiprog Messages postés 4297 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 9 janvier 2013 - 28 avril 2002 à 21:21
cs_Delphiprog Messages postés 4297 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 9 janvier 2013 - 28 avril 2002 à 21:21
1 réponse
cs_Delphiprog
Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Membre
Dernière intervention
9 janvier 2013
32
28 avril 2002 à 21:21
28 avril 2002 à 21:21
Il suffit de ne pas donner de nom à la clé :
procedure TForm1.Button1Click(Sender: TObject);
var
Reg : TRegistry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey('\Software\Borland', True) then
Reg.WriteString('', 'Test');
finally
Reg.CloseKey;
Reg.Free;
end
end;
Cet exemple écrit "Test" dans la valeur par défaut.
May Delphi be with you.
procedure TForm1.Button1Click(Sender: TObject);
var
Reg : TRegistry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_CURRENT_USER;
if Reg.OpenKey('\Software\Borland', True) then
Reg.WriteString('', 'Test');
finally
Reg.CloseKey;
Reg.Free;
end
end;
Cet exemple écrit "Test" dans la valeur par défaut.
May Delphi be with you.
