Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Escribir en HKEY_LOCAL_MACHINE (https://www.clubdelphi.com/foros/showthread.php?t=32677)

Anunakis 13-06-2006 12:39:35

Escribir en HKEY_LOCAL_MACHINE
 
Hola a todos,
Haber si me podeis ayudar, tengo un problema al escribir en el registro de WindowsXP, intento escribir en el apartado HKEY_LOCAL_MACHINE pero me mete una carpeta HKEY_LOCAL_MACHINE dentro de HKEY_CURRENT_USER, ¿algien me puede decir como puedo escribir donde quiero?

Gracias de antemano

dec 13-06-2006 12:58:00

Hola,

Como parece que lo que quieres hacer es posible, podrías copiar por aquí el código que estás tratando de utilizar, de manera que alguien pudiera indicarte dónde puede estar el problema.

Creo que puedes no estar indicando explícitamente que se trabaje con la clave "HKEY_LOCAL_MACHINE", sino que, por defecto, se trabaja sobre la clave "HKEY_CURRENT_USER".

De todos modos, ya digo, si te animas, un poco de código en este caso creo que vendría de perilla. ;)

seoane 13-06-2006 13:03:27

Dejame adivinar lo que pasa, seguramente estas incluyendo HKEY_LOCAL_MACHINE dentro de la ruta de clave. La forma correcta de hacerlo es esta, supongamos que queremos abrir "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\USBSTOR":

Código Delphi [-]
with TRegistry.Create do
  try
    // HKEY_LOCAL_MACHINE es una constante de tipo DWORD
    RootKey:= HKEY_LOCAL_MACHINE;
    if OpenKey('\SYSTEM\CurrentControlSet\Services\USBSTOR',TRUE) then
    begin
      // Aqui haz lo que quieras
      CloseKey;
    end;
  finally
    Free;
  end;

dec 13-06-2006 13:16:51

Hola,

Seoane, estoy por preguntarte quién ganará el mundial, porque como adivino no tienes precio. Quiero decir que me parece que has acertado. Ya comentará algo el compañero. Por cierto, no te pregunto quién ganará el mundial por si alguna vez requiero de tus dotes adivinatorias para algo que verdaderamente importe. Que no quiero ser pesado y ya está. :D

Anunakis 13-06-2006 17:14:23

Me faltaba el RootKey, no me acordaba :p, gracias a todos por la rapidez

Código Delphi [-]
Registro:= TRegIniFile.Create('');
Registro.RootKey:= HKEY_LOCAL_MACHINE;
Registro.OpenKey('\SYSTEM\CurrentControlSet\Services',TRUE);


La franja horaria es GMT +2. Ahora son las 17:00:06.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi