Discussion :

[Vodkha]

Hello,

J'ai un petit prob de compatibilité avec mon prog et vista.

C'est au niveau de la base de registre.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
with TRegistry.Create do
  begin
    try
      RootKey := HKEY_LOCAL_MACHINE;
      OpenKey('System\CurrentControlSet\Services\XXXXXX', False);
      st := TstringList.Create;
      GetValueNames(st);

st.count vaut tjs zéro sur vista alors que sur xp pas de problème cela fonctionne sans prob, il me détecte mes valuenames.

Quelqu'un peut-il me dire ce qui se passe ?

A+

[ShaiLeTroll]

Vista ajoute un grand nombre de sécurité, et il est possible qu'il faille demander un token pour la lecture de la base de registre dans certaines clés ...

[Cl@udius]

Salut

Je pense tout comme Shai que c'est un problème de droits.
Et en limitant l'accès en lecture, comme ceci ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
  with TRegistry.Create(HK_EXECUTE) do 
  // ...

@+

[Vodkha]

Merci de votre aide mais

HK_EXECUTE se trouve dans quel unit ?

[Cl@udius]

Oups, excuse-moi il s'agit de KEY_EXECUTE (inclus dans Windows.pas).

@+

[Vodkha]

TRegistry.Create(KEY_READ)

sorry mais c'est KEY_READ

et en plus ca fonctionne !

cool merci à vous

[Cl@udius]

Salut

pour info:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
  KEY_EXECUTE  =  KEY_READ and not SYNCHRONIZE;

Donc a priori cela devrait fonctionner également.
Mais puisque ca marche avec KEY_READ. Tant mieux !

@+ Claudius