Comprobar llave en el Registro

[ecfisa]

Hola.

Disculpá, lo hice de memoria y me olvidé de RootKey...

Código Delphi [-]
begin
  with TRegistry.Create do
  begin
    RootKey:= HKEY_CURRENT_USER;
    if KeyExists('Software\Microsoft\Windows\CurrentVersion\Run\Sidebar') then
      MessageBoxA(0,'LLave encontrada!','Bien', 64)
    else
      MessageBoxA(0,'LLave no encontrada!','Mal', 64);
  end;
end;

Saludos.