leer una veriable del Regedit de windows con Delphi

[afarenas]

compañeros:
Necesito leer una variable del regedit de windows, alguien
me podria indicar como hacer esto en Delphi.
Gracias.

[roman]

Usa la clase TRegEdit. Para más información busca en la ayuda de Delphi o en estos mismos foros.

// Saludos

[jachguate]

Hola. Supongo que roman se refiere a la clase TRegistry. ¿cierto?

Saludos

[roman]

Muy cierto

// Saludos

[afarenas]

Estuve tratando con esa clase pero no pude hacerla funcionar, no se como
mire el ejemplo que trae la ayuda de delphi y tampoco me funcionó,
podria alguno colaborarme con algun ejemplo?

[jachguate]

Allí te va:

Código Delphi [-]
uses registry;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  reg: TRegistry;
begin
  reg := TRegistry.Create;
  try
    if reg.OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\RunMRU', False) then
      ShowMessage('El último comando ejecutar de este usuario fue: ' + reg.ReadString('a'));
  finally
    reg.Free;
  end;
end;

Hasta luego.

[[seoane]]

Yo solo añadiria dos cosas:

Código Delphi [-]
 with TRegistry.Create do
  try
    RootKey:= HKEY_CURRENT_USER; // <-- La clave root
    if OpenKey('SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\RunMRU',FALSE) then
    begin
      ShowMessage('El último comando ejecutar de este usuario fue: ' + ReadString('a'));
      CloseKey; // Y cerrar al salir, solo por educacion jejeje
    end;
  finally
    Free;
  end;

La verdad es que en el caso anterior se podía omitir la Rootkey ya que por defecto es HKEY_CURRENT_USER pero por si es otra diferente ahí queda el dato.

[jachguate]

Empezado por seoane

La verdad es que en el caso anterior se podía omitir la Rootkey ya que por defecto es HKEY_CURRENT_USER pero por si es otra diferente ahí queda el dato.

Efectivamente, la raiz por defecto es HKCU, por eso la omití. Tené por seguro que al destruir el objeto, la llave también se cerrará... Te dejo la implementación actual del destructor de la clase TRegistry:

Código Delphi [-]
destructor TRegistry.Destroy;
begin
  CloseKey;
  inherited;
end;

Hasta luego.

[[seoane]]

Empezado por jachguate

Tené por seguro que al destruir el objeto, la llave también se cerrará

Por supuesto, por eso puse el comentario, mas o menos gracioso (veo que no tanto ), para dar a entender que en este caso tampoco era necesario usar CloseKey. La intención de puntualizar lo del Rootkey y Closekey es que al usar "copiar y pegar" no se este olvidando algo importante, en ningún caso corregirte. Imagínate que quiere leer una clave fuera de HKEY_CURRENT_USER o varias claves diferentes, en ese caso ya no daría igual.