Bonjour, voici le code qui me permet de lire certaines informations dans la base de registre :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var
  aRegistre : TRegistry;
  i : Integer;
begin
  aRegistre := TRegistry.Create;
  aRegistre.RootKey := HKEY_CURRENT_USER;
  aRegistre.OpenKey( GetKeyConnexion, True );
  try
    if aRegistre.ValueExists( GetValue ) then
      Result := aRegistre.ReadString( GetCleCheminMySystemList )
    else
      Result := '';
  finally
    aRegistre.CloseKey;
    aRegistre.Free;
  end;
end;
Rien de bien sorcier et en général ça marche très bien.
Sauf que quand j'utilise ce même code avec un nouveau projet qui est de type Service Windows, il ne va pas lire les données dans HKEY_CURRENT_USER mais dans HKEY_USERS/.DEFAULT et les données ne sont pas les mêmes.
Je fais les tests alors que je suis bien logué avec un compte windows.
J'avais déjà remarqué ces problèmes auparavant sans faire trop de recherche dessus, mais maintenant, ça me pose de vrai soucis.

Savez-vous d'où ça vient et si on peut faire qqch ?
Merci.