Comprobar llave en el Registro

[KnoX_RuS]

Estuve viendo y si pongo solo direccion de carpeta '\Software\Microsoft\Windows\CurrentVersion\Run\' si dice que existe pero las llaves de las carpetas no las comprueva osea si pongo '\Software\Microsoft\Windows\CurrentVersion\Run\Sidebar' dice que no existe.


saludos.

[ecfisa]

Hola.

Ahora veo..., lo que sucede es que lo que estas buscando no es una clave es un valor.

Entonces en tu caso sería:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  with TRegistry.Create do
  try
    RootKey:= HKEY_CURRENT_USER;
    if OpenKey('Software\Microsoft\Windows\CurrentVersion\Run\', False) then
      if ValueExists('Sidebar') then
        ShowMessage('Valor existente')
      else
        ShowMessage('Valor inexistente');
  finally
    Free;
  end;
end;

Saludos.

[KnoX_RuS]

Ostia es verda, perdoname por confundirte ahora sique si jeje.

Muchas gracias y saludos!